bin: budget: adapt to CliOpts re-factoring
Fixes simonmichael/hledger#615
This commit is contained in:
parent
732d589955
commit
8922d86eb9
@ -190,7 +190,7 @@ cmdmode = (mainmode [])
|
|||||||
|
|
||||||
journalBalanceTransactions' :: CliOpts -> Journal -> IO Journal
|
journalBalanceTransactions' :: CliOpts -> Journal -> IO Journal
|
||||||
journalBalanceTransactions' opts j = do
|
journalBalanceTransactions' opts j = do
|
||||||
let assrt = not $ ignore_assertions_ opts
|
let assrt = not . ignore_assertions_ $ inputopts_ opts
|
||||||
either error' return $ journalBalanceTransactions assrt j
|
either error' return $ journalBalanceTransactions assrt j
|
||||||
|
|
||||||
withJournalDo' :: CliOpts -> (CliOpts -> Journal -> IO ()) -> IO ()
|
withJournalDo' :: CliOpts -> (CliOpts -> Journal -> IO ()) -> IO ()
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user