;check, payees, journal: payee directive no longer consumes trailing whitespace (#1580)

This commit is contained in:
Simon Michael 2021-06-23 14:13:24 -10:00
parent 46d3eaf920
commit 59b1e46b88

View File

@ -529,7 +529,7 @@ payeedirectivep :: JournalParser m ()
payeedirectivep = do
string "payee" <?> "payee directive"
lift skipNonNewlineSpaces1
payee <- lift descriptionp -- all text until ; or \n
payee <- lift $ T.strip <$> noncommenttext1p
(comment, tags) <- lift transactioncommentp
addPayeeDeclaration (payee, comment, tags)
return ()