From 7b026ef6f477a09538c55472d4f3adf383027385 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Wed, 10 Mar 2010 01:25:02 +0000
Subject: [PATCH] parsing: allow transactions with empty descriptions

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

diff --git a/hledger-lib/Ledger/Parse.hs b/hledger-lib/Ledger/Parse.hs
index 8c52813fe..25619ff37 100644
--- a/hledger-lib/Ledger/Parse.hs
+++ b/hledger-lib/Ledger/Parse.hs
@@ -394,7 +394,7 @@ ledgerTransaction = do
   edate <- try (ledgereffectivedate date <?> "effective date") <|> return Nothing
   status <- ledgerstatus
   code <- ledgercode
-  description <- many1 spacenonewline >> liftM rstrip (many1 (noneOf ";\n") <?> "description")
+  description <- many1 spacenonewline >> liftM rstrip (many (noneOf ";\n") <?> "description")
   comment <- ledgercomment <|> return ""
   restofline
   postings <- ledgerpostings