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

parse comment lines beginning with a space, as from M-; in emacs ledger-mode

Browse Source
This commit is contained in:
Simon Michael 2008-10-18 10:54:22 +00:00
parent 7879ca63ca
commit 64c6082c23
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Ledger/Parse.hs
View File

@ -191,6 +191,7 @@ blankline =
commentline :: Parser String commentline :: Parser String
commentline = do commentline = do
many spacenonewline
char ';' <?> "comment line" char ';' <?> "comment line"
l <- restofline l <- restofline
return $ ";" ++ l return $ ";" ++ l