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

fix:repl: also catch IO errors like run nosuchfile

Browse Source 
And print exceptions consistently, with a single newline.
This commit is contained in:
Simon Michael 2025-03-06 13:05:45 -10:00
parent 9ecc3a56d0
commit a1a6aad873
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
hledger/Hledger/Cli/Commands/Run.hs
View File

@ -180,9 +180,10 @@ runREPL defaultJournalOverride findBuiltinCommand = do
Just input -> do
liftIO $ (runCommand defaultJournalOverride findBuiltinCommand $ argsAddDoubleDash $ parseCommand input)
`catches`
[Handler (\(e::ErrorCall) -> putStr $ show e)
,Handler (\(_::ExitCode) -> return ())
,Handler (\UserInterrupt -> return ())
[Handler (\(e::ErrorCall) -> putStrLn $ rstrip $ show e)
,Handler (\(e::IOError) -> putStrLn $ rstrip $ show e)
,Handler (\(_::ExitCode) -> return ())
,Handler (\UserInterrupt -> return ())
]
loop prompt