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

shake: be more verbose when updating changelogs

Browse Source 
[ci skip]
This commit is contained in:
Simon Michael 2019-07-25 08:46:13 +01:00
parent 49523b1611
commit 11208222d4
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
Shake.hs
View File

@ -585,7 +585,9 @@ main = do
] ]
liftIO $ if dryrun liftIO $ if dryrun
then putStr newcontent then putStr newcontent
else writeFile out newfile else do
writeFile out newfile
putStrLn $ out ++ ": updated to " ++ headrev
) )
-- [PKG/]CHANGES.md-finalise <- PKG/.version -- [PKG/]CHANGES.md-finalise <- PKG/.version
@ -609,7 +611,9 @@ main = do
date <- liftIO getCurrentDay date <- liftIO getCurrentDay
let (before, _:after) = break ("# " `isPrefixOf`) $ lines old let (before, _:after) = break ("# " `isPrefixOf`) $ lines old
new = unlines $ before ++ ["# "++version++" "++show date] ++ after new = unlines $ before ++ ["# "++version++" "++show date] ++ after
liftIO $ writeFile out new liftIO $ do
writeFile out new
putStrLn $ out ++ ": updated to " ++ version
) )
-- VERSION NUMBERS -- VERSION NUMBERS