From 6d164b48a05aaefed023127d1400c15ed8d05fcd Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Mon, 8 Sep 2025 18:55:29 +0100 Subject: [PATCH] imp:journal: in amounts, also allow and ignore empty {} (or {{}}) --- hledger-lib/Hledger/Read/Common.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/hledger-lib/Hledger/Read/Common.hs b/hledger-lib/Hledger/Read/Common.hs index 5d5bcebfe..6a206a0c4 100644 --- a/hledger-lib/Hledger/Read/Common.hs +++ b/hledger-lib/Hledger/Read/Common.hs @@ -1025,7 +1025,7 @@ balanceassertionp = do } -- Parse a Ledger-style lot cost, --- {UNITCOST} or {{TOTALCOST}} or {=FIXEDUNITCOST} or {{=FIXEDTOTALCOST}}, +-- {UNITCOST} or {{TOTALCOST}} or {=FIXEDUNITCOST} or {{=FIXEDTOTALCOST}} or {}, -- and discard it. lotcostp :: JournalParser m () lotcostp = @@ -1036,7 +1036,7 @@ lotcostp = lift skipNonNewlineSpaces _fixed <- fmap isJust $ optional $ char '=' lift skipNonNewlineSpaces - _a <- simpleamountp False + _a <- option 0 $ simpleamountp False lift skipNonNewlineSpaces char '}' when (doublebrace) $ void $ char '}'