From bca4b39c58eea55276eb85d9440274e838d794d4 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Fri, 25 Apr 2025 15:42:47 -1000
Subject: [PATCH] lib: defaultJournalSafely: don't strip newline

---
 hledger-lib/Hledger/Read.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/hledger-lib/Hledger/Read.hs b/hledger-lib/Hledger/Read.hs
index 9863cb286..6df411f80 100644
--- a/hledger-lib/Hledger/Read.hs
+++ b/hledger-lib/Hledger/Read.hs
@@ -200,8 +200,8 @@ defaultJournalSafelyWith iopts = (do
   f <- defaultJournalPath
   runExceptT $ readJournalFile iopts f
   ) `C.catches` [  -- XXX
-     C.Handler (\(e :: C.ErrorCall)   -> return $ Left $ rstrip $ show e)
-    ,C.Handler (\(e :: C.IOException) -> return $ Left $ rstrip $ show e)
+     C.Handler (\(e :: C.ErrorCall)   -> return $ Left $ show e)
+    ,C.Handler (\(e :: C.IOException) -> return $ Left $ show e)
     ]
 -- | Get the default journal file path specified by the environment.
 -- Like ledger, we look first for the LEDGER_FILE environment