lib: fix my wrong merge of #880

This commit is contained in:
Simon Michael 2018-10-09 14:06:22 -07:00
parent 0f921bfbe0
commit f6e095e794

View File

@ -481,7 +481,7 @@ periodictransactionp = do
lift $ skipMany spacenonewline
-- a period expression
off <- getOffset
pos <- getPosition
pos <- getSourcePos
-- if there's a default year in effect, use Y/1/1 as base for partial/relative dates
today <- liftIO getCurrentDay