1
0
Fork 0

More concret message for git deploy

This commit is contained in:
Malte Brandy 2020-05-30 18:08:54 +02:00
parent ad3862b1cc
commit 2ae16d6762

View file

@ -31,7 +31,7 @@ let
whenJust deployMay $ \deploy -> do
(maybe [] (\x -> ["-A", x]) -> target) <- lookupEnv "GL_OPTION_WEB_DEPLOY_NIX_TARGET"
(decodeUtf8 -> path) <- pwd |> captureTrim
say [i|Deploying build to /var/www/#{deploy}|]
say [i|Building default.nix #{show target} to /var/www/#{deploy}|]
bracket (checkout path) (rm "-rf") $ \repoDir -> withCurrentDirectory repoDir $ nix_build "-o" ([i|/var/www/#{deploy}|] :: String) target
say "Done"
testFlag <- lookupEnv "GL_OPTION_TEST"