1
1
mirror of https://github.com/aelve/guide.git synced 2024-11-22 11:33:34 +03:00

Merge pull request #191 from aelve/ghc-no-js

Add no-js option for building
This commit is contained in:
Artyom Kazak 2017-08-19 21:22:19 +03:00 committed by GitHub
commit cc33dea102

View File

@ -1,9 +1,14 @@
import Distribution.Simple
import System.Process
import System.Environment (lookupEnv)
main = do
hooks <- buildJS simpleUserHooks
defaultMainWithHooks hooks
js <- lookupEnv "NO_JS"
case js of
Just "true" -> defaultMain
_ -> do
hooks <- buildJS simpleUserHooks
defaultMainWithHooks hooks
buildJS hooks = do
let originalPostBuild = postBuild hooks