mole-0.0.3: src/Data/Mole/Builder/JavaScript.hs

module Data.Mole.Builder.JavaScript where


import qualified Data.Set as S

import qualified Data.ByteString as BS

import           Data.Mole.Types
import           Data.Mole.Builder.Internal.Fingerprint



javascriptBuilder :: String -> Handle -> AssetId -> IO Builder
javascriptBuilder src _ _ = do
    body <- BS.readFile src
    return $ Builder
        { assetSources      = S.singleton src
        , assetDependencies = S.empty
        , packageAsset      = const $ Right $ Result (fingerprint body src) $ Just (body, "text/javascript")
        }