require a non-empty description in ledger transactions
This commit is contained in:
parent
5d1f535b5e
commit
eb3ec063d0
@ -314,7 +314,7 @@ ledgerTransaction = do
|
|||||||
-- ledger treats entry comments as part of the description, we will too
|
-- ledger treats entry comments as part of the description, we will too
|
||||||
-- desc <- many (noneOf ";\n") <?> "description"
|
-- desc <- many (noneOf ";\n") <?> "description"
|
||||||
-- let description = reverse $ dropWhile (==' ') $ reverse desc
|
-- let description = reverse $ dropWhile (==' ') $ reverse desc
|
||||||
description <- many (noneOf "\n") <?> "description"
|
description <- many1 (noneOf "\n") <?> "description"
|
||||||
comment <- ledgercomment
|
comment <- ledgercomment
|
||||||
restofline
|
restofline
|
||||||
postings <- ledgerpostings
|
postings <- ledgerpostings
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user