From 29bf134624895df41c221fc09ce37755504e68b3 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sat, 20 Jun 2009 04:09:59 +0000
Subject: [PATCH] better postings parse error

---
 Ledger/Parse.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Ledger/Parse.hs b/Ledger/Parse.hs
index 56bc5eeb6..6c0c161f9 100644
--- a/Ledger/Parse.hs
+++ b/Ledger/Parse.hs
@@ -375,7 +375,7 @@ ledgerpostings = do
   let ls' = filter (not . (ledgercommentline `parses`)) ls
   guard (not $ null ls')
   return $ map (fromparse . parseWithCtx ctx ledgerposting) ls'
-  <?> "ledger postings"
+  <?> "postings"
 
 linebeginningwithspaces :: GenParser Char st String
 linebeginningwithspaces = do