;dev: clarify
This commit is contained in:
parent
713773cfc3
commit
f1f1ad5c94
@ -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
|
||||
|
||||
Loading…
Reference in New Issue
Block a user