From 7cc2d86ac0de65f83ff62e73d497be6386bca5fe Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Tue, 6 Jun 2017 09:43:05 -0700 Subject: [PATCH] lib: fix unit tests after 5c095534 --- hledger-lib/Hledger/Data/Transaction.hs | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/hledger-lib/Hledger/Data/Transaction.hs b/hledger-lib/Hledger/Data/Transaction.hs index 3173feb13..68b8f4acd 100644 --- a/hledger-lib/Hledger/Data/Transaction.hs +++ b/hledger-lib/Hledger/Data/Transaction.hs @@ -539,7 +539,7 @@ tests_Hledger_Data_Transaction = TestList $ concat [ assertEqual "show a balanced transaction, eliding last amount" (unlines ["2007/01/28 coopportunity" - ," expenses:food:groceries $47.18" + ," expenses:food:groceries $47.18" ," assets:checking" ,"" ]) @@ -553,8 +553,8 @@ tests_Hledger_Data_Transaction = TestList $ concat [ assertEqual "show a balanced transaction, no eliding" (unlines ["2007/01/28 coopportunity" - ," expenses:food:groceries $47.18" - ," assets:checking $-47.18" + ," expenses:food:groceries $47.18" + ," assets:checking $-47.18" ,"" ]) (let t = Transaction 0 nullsourcepos (parsedate "2007/01/28") Nothing Uncleared "" "coopportunity" "" [] @@ -568,8 +568,8 @@ tests_Hledger_Data_Transaction = TestList $ concat [ assertEqual "show an unbalanced transaction, should not elide" (unlines ["2007/01/28 coopportunity" - ," expenses:food:groceries $47.18" - ," assets:checking $-47.19" + ," expenses:food:groceries $47.18" + ," assets:checking $-47.19" ,"" ]) (showTransaction @@ -582,7 +582,7 @@ tests_Hledger_Data_Transaction = TestList $ concat [ assertEqual "show an unbalanced transaction with one posting, should not elide" (unlines ["2007/01/28 coopportunity" - ," expenses:food:groceries $47.18" + ," expenses:food:groceries $47.18" ,"" ]) (showTransaction @@ -606,7 +606,7 @@ tests_Hledger_Data_Transaction = TestList $ concat [ assertEqual "show a transaction with a priced commodityless amount" (unlines ["2010/01/01 x" - ," a 1 @ $2" + ," a 1 @ $2" ," b" ,"" ])