From f9aa71caf15d60fb69ebdda18269b423e962768d Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Mon, 4 Mar 2019 11:37:40 -0800 Subject: [PATCH] shake commandhelp: don't generate a txt for the README (#981) [ci skip] --- Shake.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/Shake.hs b/Shake.hs index 830775d9a..249495570 100755 --- a/Shake.hs +++ b/Shake.hs @@ -114,7 +114,9 @@ main = do -- hledger manual also includes the markdown files from here: let commandsdir = "hledger/Hledger/Cli/Commands" - commandmds <- filter (".md" `isSuffixOf`) . map (commandsdir ) <$> S.getDirectoryContents commandsdir + commandmds <- + filter (not . ("README." `isPrefixOf`) . takeFileName) . filter (".md" `isSuffixOf`) . map (commandsdir ) + <$> S.getDirectoryContents commandsdir let commandtxts = map (-<.> "txt") commandmds let wikidir = "wiki" wikipagefilenames <- map dropExtension . filter (".md" `isSuffixOf`) <$> S.getDirectoryContents wikidir