From 1e5e26878add7800b82b53e4a247b5b14f341d29 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Mon, 2 Jul 2007 14:37:13 +0000
Subject: [PATCH] note parser issue

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

diff --git a/Parse.hs b/Parse.hs
index ff8734b6d..985cedb65 100644
--- a/Parse.hs
+++ b/Parse.hs
@@ -238,7 +238,7 @@ ledgeramount = try (do
 stripcommas = filter (',' /=)
 
 ledgereol :: Parser String
-ledgereol = ledgercomment <|> do {newline; return []}
+ledgereol = ledgercomment <|> do {newline; return []}  -- XXX problem, a transaction comment containing a digit fails
 
 spacenonewline :: Parser Char
 spacenonewline = satisfy (\c -> c `elem` " \v\f\t")