slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

journal: comment fix

Browse Source
This commit is contained in:
Simon Michael 2020-04-08 20:00:18 -07:00
parent f4a1a31712
commit 847f924828
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
hledger-lib/Hledger/Read/Common.hs
View File

@ -605,9 +605,9 @@ spaceandamountormissingp =
Mixed . (:[]) <$> amountp Mixed . (:[]) <$> amountp
-- | Parse a single-commodity amount, with optional symbol on the left -- | Parse a single-commodity amount, with optional symbol on the left
-- or right, followed by an optional transaction price (@ or @@), and -- or right, followed by, in any order: an optional transaction price,
-- an optional ledger-style lot price ({} or {=}). The lot price will -- an optional ledger-style lot price, and/or an optional ledger-style
-- be ignored, and may appear before or after the transaction price. -- lot date. A lot price and lot date will be ignored.
amountp :: JournalParser m Amount amountp :: JournalParser m Amount
amountp = label "amount" $ do amountp = label "amount" $ do
let spaces = lift $ skipMany spacenonewline let spaces = lift $ skipMany spacenonewline