diff --git a/Shake.hs b/Shake.hs index e8f6f3c8b..aa9034876 100755 --- a/Shake.hs +++ b/Shake.hs @@ -542,15 +542,30 @@ main = do else h -- assume any other .m4.md files in dir are included by this one XXX not true in hledger-lib subfiles <- liftIO $ filter (/= src) . filter (".m4.md" `isSuffixOf`) . map (dir >) <$> S.getDirectoryContents dir - let deps = [src, commonm4, commandsm4, packageversionm4, packagemandatem4] ++ subfiles + let deps = [src, commonm4, packageversionm4, packagemandatem4] ++ subfiles need deps - when (manual=="hledger") $ need commandmds + when (manual=="hledger") $ need $ commandsm4 : commandmds -- add the web page's heading. -- XXX Might be nice to do this atomically with the below, so -- make avoid any double refresh when watch docs with entr/livereload. -- But cmd Shell doesn't handle arguments containing spaces properly. - liftIO $ writeFile out $ unlines [ - "" + let + aboutmsg = + ["" + ] + liftIO $ writeFile out $ unlines $ + aboutmsg <> + ["" ,"
" ,"" ,"# " ++ heading