slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

note parser issue

Browse Source
This commit is contained in:
Simon Michael 2007-07-02 14:37:13 +00:00
parent 738a59dfcf
commit 1e5e26878a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Parse.hs
View File

@ -238,7 +238,7 @@ ledgeramount = try (do
stripcommas = filter (',' /=) stripcommas = filter (',' /=)
ledgereol :: Parser String 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 :: Parser Char
spacenonewline = satisfy (\c -> c `elem` " \v\f\t") spacenonewline = satisfy (\c -> c `elem` " \v\f\t")