From 325a155f0bc804872c7011cc1a5a83db93af6b63 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sun, 29 Nov 2020 13:24:33 -0800
Subject: [PATCH] check-dates: on success, be silent and don't force program
 exit

---
 hledger/Hledger/Cli/Commands/Checkdates.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/hledger/Hledger/Cli/Commands/Checkdates.hs b/hledger/Hledger/Cli/Commands/Checkdates.hs
index 19ff82128..7b7bec50e 100755
--- a/hledger/Hledger/Cli/Commands/Checkdates.hs
+++ b/hledger/Hledger/Cli/Commands/Checkdates.hs
@@ -32,8 +32,8 @@ checkdates CliOpts{rawopts_=rawopts,reportspec_=rspec} j = do
         then date a <  date b
         else date a <= date b
   case checkTransactions compare ts of
-   FoldAcc{fa_previous=Nothing} -> putStrLn "ok (empty journal)" >> exitSuccess
-   FoldAcc{fa_error=Nothing}    -> putStrLn "ok" >> exitSuccess
+   FoldAcc{fa_previous=Nothing} -> return ()
+   FoldAcc{fa_error=Nothing}    -> return ()
    FoldAcc{fa_error=Just error, fa_previous=Just previous} ->
     (putStrLn $ printf ("ERROR: transaction out of%s date order"
      ++ "\nPrevious date: %s"