From f1f1ad5c946140424720f2d93103554bbae13bbf Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Fri, 30 May 2025 10:48:14 -1000 Subject: [PATCH] ;dev: clarify --- hledger/Hledger/Cli/Utils.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/hledger/Hledger/Cli/Utils.hs b/hledger/Hledger/Cli/Utils.hs index 85eeb08b8..0bef6d90e 100644 --- a/hledger/Hledger/Cli/Utils.hs +++ b/hledger/Hledger/Cli/Utils.hs @@ -129,8 +129,8 @@ writeOutput opts s = do -- If writing to stdout, a pager is used when appropriate and possible. writeOutputLazyText :: CliOpts -> TL.Text -> IO () writeOutputLazyText opts s = do - f <- outputFileFromOpts opts - maybe (runPager . TL.unpack) TL.writeFile f s + mf <- outputFileFromOpts opts + maybe (runPager . TL.unpack) TL.writeFile mf s -- -- | Get a journal from the given string and options, or throw an error. -- readJournal :: CliOpts -> String -> IO Journal