web: fix a compilation breakage from balance assertions work

2013-05-30 14:45:30 -07:00 · 2013-05-30 14:45:30 -07:00 · 207fd06a6f
commit 207fd06a6f
parent 4721bfce42
1 changed files with 2 additions and 2 deletions
--- 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