From 207fd06a6fe479a712c64795512edb1a869707c2 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Thu, 30 May 2013 14:45:30 -0700 Subject: [PATCH] web: fix a compilation breakage from balance assertions work --- hledger-web/Handler/Post.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/hledger-web/Handler/Post.hs b/hledger-web/Handler/Post.hs index 197a2268b..c13d46d70 100644 --- a/hledger-web/Handler/Post.hs +++ b/hledger-web/Handler/Post.hs @@ -67,8 +67,8 @@ handleAdd = do tdate=parsedate date ,tdescription=desc ,tpostings=[ - Posting Nothing Nothing False acct1 (mixed amt1) "" RegularPosting [] Nothing - ,Posting Nothing Nothing False acct2 (mixed amt2) "" RegularPosting [] Nothing + nullposting{paccount=acct1, pamount=mixed amt1} + ,nullposting{paccount=acct2, pamount=mixed amt2} ] }) -- display errors or add transaction