diff --git a/Hledger/Cli/Tests.hs b/Hledger/Cli/Tests.hs index 9e7836cc8..197eb0215 100644 --- a/Hledger/Cli/Tests.hs +++ b/Hledger/Cli/Tests.hs @@ -125,6 +125,8 @@ tests = TestList [ ," $-1 gifts" ," $-1 salary" ," $1 liabilities:debts" + ,"--------------------" + ," $0" ] ,"balance report can be limited with --depth" ~: @@ -133,6 +135,8 @@ tests = TestList [ ," $2 expenses" ," $-2 income" ," $1 liabilities" + ,"--------------------" + ," $0" ] ,"balance report with account pattern o" ~: @@ -176,6 +180,8 @@ tests = TestList [ ," $-1 gifts" ," $-1 salary" ," $1 liabilities:debts" + ,"--------------------" + ," $0" ] ,"balance report with unmatched parent of two matched subaccounts" ~: @@ -208,7 +214,10 @@ tests = TestList [ ] ,"balance report negative account pattern always matches full name" ~: - ([], ["not:e"]) `gives` [] + ([], ["not:e"]) `gives` + ["--------------------" + ," 0" + ] ,"balance report negative patterns affect totals" ~: ([], ["expenses","not:food"]) `gives` @@ -234,13 +243,14 @@ tests = TestList [ ,"2008/1/1 test " ," a:b 10h @ $50" ," c:d " - ,"" ] let j' = journalCanonicaliseAmounts $ journalConvertAmountsToCost j -- enable cost basis adjustment showBalanceReport [] nullfilterspec j' `is` unlines [" $500 a:b" ," $-500 c:d" + ,"--------------------" + ," $0" ] ,"balance report elides zero-balance root account(s)" ~: do @@ -254,6 +264,8 @@ tests = TestList [ unlines [" 1 test:a" ," -1 test:b" + ,"--------------------" + ," 0" ] ] @@ -576,7 +588,10 @@ tests = TestList [ "2009/01/01 * медвежья шкура\n расходы:покупки 100\n актив:наличные\n" showBalanceReport [] (optsToFilterSpec [] [] t1) l `is` unlines [" -100 актив:наличные" - ," 100 расходы:покупки"] + ," 100 расходы:покупки" + ,"--------------------" + ," 0" + ] ,"unicode in register layout" ~: do l <- readJournalWithOpts [] diff --git a/tests/effective-balance.test b/tests/effective-balance.test index 552145d04..43740a512 100644 --- a/tests/effective-balance.test +++ b/tests/effective-balance.test @@ -10,3 +10,5 @@ bin/hledger -f - balance -p 'in 2009' --effective >>> 1 a -1 b +-------------------- + 0 diff --git a/tests/eliding-balance.test b/tests/eliding-balance.test index c736b129e..3c043e531 100644 --- a/tests/eliding-balance.test +++ b/tests/eliding-balance.test @@ -6,3 +6,5 @@ bin/hledger -f - balance >>> €1 aaaaaaaaaaaaaaaaaaaa:aaaaaaaaaaaaaaaaaaaa:aaaaaaaaaaaaaaaaaaaa €-1 b +-------------------- + €0 diff --git a/tests/sample-balance-depth.test b/tests/sample-balance-depth.test index 2c9daa416..cc53733dc 100644 --- a/tests/sample-balance-depth.test +++ b/tests/sample-balance-depth.test @@ -4,3 +4,5 @@ bin/hledger -f data/sample.ledger balance --depth 1 $2 expenses $-2 income $1 liabilities +-------------------- + $0 diff --git a/tests/sample-balance.test b/tests/sample-balance.test index de93e7a54..36f5428f3 100644 --- a/tests/sample-balance.test +++ b/tests/sample-balance.test @@ -10,3 +10,5 @@ bin/hledger -f data/sample.ledger balance $-1 gifts $-1 salary $1 liabilities:debts +-------------------- + $0 diff --git a/tests/unicode-balance.test b/tests/unicode-balance.test index 18369a4fb..24a0d5433 100644 --- a/tests/unicode-balance.test +++ b/tests/unicode-balance.test @@ -6,3 +6,5 @@ bin/hledger -f - balance >>> 10 руб τράπεζα -10 руб नकद +-------------------- + 0 руб diff --git a/tests/virtual.test b/tests/virtual.test index d57203205..30d800928 100644 --- a/tests/virtual.test +++ b/tests/virtual.test @@ -46,3 +46,5 @@ bin/hledger -f- -1 b 10 e -10 f +-------------------- + 0