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

;cln: doc: fix garbled haddock for journalDateSpan, journalDateSpanBothDates

Browse Source 
hopefully
This commit is contained in:
Simon Michael 2023-05-27 12:01:20 -10:00
parent 95cedd465f
commit d7f0398542
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/Data/Journal.hs
View File

@ -984,17 +984,17 @@ journalStyleInfluencingAmounts j =
-- overcomplicated/unused amount traversal stuff -- overcomplicated/unused amount traversal stuff
-- --
-- | Get an ordered list of 'AmountStyle's from the amounts in this -- Get an ordered list of 'AmountStyle's from the amounts in this
-- journal which influence canonical amount display styles. See -- journal which influence canonical amount display styles. See
-- traverseJournalAmounts. -- traverseJournalAmounts.
-- journalAmounts :: Journal -> [Amount] -- journalAmounts :: Journal -> [Amount]
-- journalAmounts = getConst . traverseJournalAmounts (Const . (:[])) -- journalAmounts = getConst . traverseJournalAmounts (Const . (:[]))
-- --
-- | Apply a transformation to the journal amounts traversed by traverseJournalAmounts. -- Apply a transformation to the journal amounts traversed by traverseJournalAmounts.
-- overJournalAmounts :: (Amount -> Amount) -> Journal -> Journal -- overJournalAmounts :: (Amount -> Amount) -> Journal -> Journal
-- overJournalAmounts f = runIdentity . traverseJournalAmounts (Identity . f) -- overJournalAmounts f = runIdentity . traverseJournalAmounts (Identity . f)
-- --
-- | A helper that traverses over most amounts in the journal, -- A helper that traverses over most amounts in the journal,
-- in particular the ones which influence canonical amount display styles, -- in particular the ones which influence canonical amount display styles,
-- processing them with the given applicative function. -- processing them with the given applicative function.
-- --