slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Shake cabalfiles: give an error when this fails

Browse Source
This commit is contained in:
Simon Michael 2020-11-10 07:00:13 -08:00
parent de42cc6706
commit 84ee05baa6
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Shake.hs
View File

@ -503,7 +503,12 @@ main = do
-- regenerate .cabal files from package.yaml's, using stack (also installs deps) -- regenerate .cabal files from package.yaml's, using stack (also installs deps)
phony "cabalfiles" $ do phony "cabalfiles" $ do
cmd Shell "stack build --dry-run --silent" :: Action () -- can fail to update cabal files, with zero exit status; need
-- to check stderr, and only for error message since all
-- output goes there
err <- fromStderr <$> (cmd Shell "stack build --dry-run" :: Action (Stderr String))
when ("was generated with a newer version of hpack" `isInfixOf` err) $
liftIO $ putStr err >> exitFailure
when commit $ do when commit $ do
let msg = ";update cabal files" let msg = ";update cabal files"
cmd Shell gitcommit ("-m '"++msg++"' --") cabalfiles cmd Shell gitcommit ("-m '"++msg++"' --") cabalfiles