From 8922d86eb943f1109b2a2f41bba7fed74d3d2709 Mon Sep 17 00:00:00 2001 From: Mykola Orliuk Date: Sun, 1 Oct 2017 22:32:24 +0200 Subject: [PATCH] bin: budget: adapt to CliOpts re-factoring Fixes simonmichael/hledger#615 --- bin/hledger-budget.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/bin/hledger-budget.hs b/bin/hledger-budget.hs index 0b7ab5223..0334c9b1f 100755 --- a/bin/hledger-budget.hs +++ b/bin/hledger-budget.hs @@ -190,7 +190,7 @@ cmdmode = (mainmode []) journalBalanceTransactions' :: CliOpts -> Journal -> IO Journal journalBalanceTransactions' opts j = do - let assrt = not $ ignore_assertions_ opts + let assrt = not . ignore_assertions_ $ inputopts_ opts either error' return $ journalBalanceTransactions assrt j withJournalDo' :: CliOpts -> (CliOpts -> Journal -> IO ()) -> IO ()