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

;imp:setup: accounts of all types wording

Browse Source
This commit is contained in:
Simon Michael 2025-10-13 11:43:21 -10:00
parent 71b4a1a281
commit c17b15e454
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
hledger/Hledger/Cli/Commands/Setup.hs
View File

@ -438,10 +438,10 @@ setupJournal meconf = do
pdesc "all accounts have types ?"
if null untypedaccts then p Y "" else i N (show (length untypedaccts) <> " accounts without types")
pdesc "all account types are detected ?"
pdesc "accounts of all types exist ?"
if null typesnotfound
then p Y (concatMap show accttypes <> " account types detected")
else p N (concatMap show typesnotfound <> " not found; bs/cf/is reports may not work")
then p Y (concatMap show accttypes <> " accounts detected")
else p N (concatMap show typesnotfound <> " accounts not found; some reports may not work")
pdesc "commodities/accounts are being checked ?"
let strict = isJust $ conflookup (\a -> any (==a) ["-s", "--strict"])