simonmichael/hledger
1
1
Fork 0
mirror of https://github.com/simonmichael/hledger.git synced 2024-11-08 07:09:28 +03:00
Code Issues Projects Releases Wiki Activity

parsing: don't let trailing whitespace in a timelog description mess up layout

Browse Source
This commit is contained in:
Simon Michael 2010-07-08 03:08:28 +00:00
parent 816083d82f
commit 3e9ad0ae13
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hledger-lib/Hledger/Read/Timelog.hs
View File

@ -93,7 +93,7 @@ timelogentry = do
many1 spacenonewline
datetime <- ledgerdatetime
comment <- optionMaybe (many1 spacenonewline >> liftM2 (++) getParentAccount restofline)
return $ TimeLogEntry (read [code]) datetime (fromMaybe "" comment)
return $ TimeLogEntry (read [code]) datetime (maybe "" rstrip comment)
tests_Timelog = TestList [
]