From 8705b935defc2c126ac3d95eaf979a5d2d3158e5 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Wed, 23 Apr 2025 22:50:19 -1000 Subject: [PATCH] imp:setup: output tweaks --- hledger/Hledger/Cli/Commands/Setup.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/hledger/Hledger/Cli/Commands/Setup.hs b/hledger/Hledger/Cli/Commands/Setup.hs index 3d02ccb81..f5d941a90 100644 --- a/hledger/Hledger/Cli/Commands/Setup.hs +++ b/hledger/Hledger/Cli/Commands/Setup.hs @@ -344,7 +344,7 @@ setupPager version conf = do let arg = reverse $ takeWhile (`notElem` ['=',' ']) $ reverse a return $ Just $ parseYNA arg - pdesc "it will use a pager for large output ?" + pdesc "hledger will use a pager when needed ?" mpager <- findPager case mpager of Nothing -> p N "no pager was found" @@ -556,7 +556,7 @@ setupAccounts version mj = do pdesc "all accounts have types ?" if null untypedaccts then i Y "" else i N "" - pdesc "all used accounts are declared ?" + pdesc "all accounts are declared ?" if null undeclaredaccts then i Y "" else i N "" ------------------------------------------------------------------------------ @@ -574,7 +574,7 @@ setupCommodities version mj = do Nothing -> return () Just j -> do - pdesc "all used commodities are declared ?" + pdesc "all commodities are declared ?" let undeclaredcommodities = journalCommoditiesUsed j \\ journalCommoditiesDeclared j if null undeclaredcommodities then p Y "" else p N "declaring helps set their precision"