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

;web: fix ci, haddock failure

Browse Source
This commit is contained in:
Simon Michael 2021-08-07 11:35:19 -10:00
parent 233b8c91cb
commit c8e5673287
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hledger-web/Hledger/Web/Main.hs
View File

@ -57,7 +57,7 @@ hledgerWebMain = do
| "info" `inRawOpts` rawopts_ -> runInfoForTopic "hledger-web" Nothing | "info" `inRawOpts` rawopts_ -> runInfoForTopic "hledger-web" Nothing
| "man" `inRawOpts` rawopts_ -> runManForTopic "hledger-web" Nothing | "man" `inRawOpts` rawopts_ -> runManForTopic "hledger-web" Nothing
| "version" `inRawOpts` rawopts_ -> putStrLn prognameandversion >> exitSuccess | "version" `inRawOpts` rawopts_ -> putStrLn prognameandversion >> exitSuccess
-- | "binary-filename" `inRawOpts` rawopts_ -> putStrLn (binaryfilename progname) -- "binary-filename" `inRawOpts` rawopts_ -> putStrLn (binaryfilename progname)
| "test" `inRawOpts` rawopts_ -> do | "test" `inRawOpts` rawopts_ -> do
-- remove --test and --, leaving other args for hspec -- remove --test and --, leaving other args for hspec
filter (not . (`elem` ["--test","--"])) <$> getArgs >>= flip withArgs hledgerWebTest filter (not . (`elem` ["--test","--"])) <$> getArgs >>= flip withArgs hledgerWebTest