From d7f039854223ab16a1d795e1122c6f1d8417ed3e Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Sat, 27 May 2023 12:01:20 -1000 Subject: [PATCH] ;cln: doc: fix garbled haddock for journalDateSpan, journalDateSpanBothDates hopefully --- hledger-lib/Hledger/Data/Journal.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/hledger-lib/Hledger/Data/Journal.hs b/hledger-lib/Hledger/Data/Journal.hs index bd86b2349..540e94370 100644 --- a/hledger-lib/Hledger/Data/Journal.hs +++ b/hledger-lib/Hledger/Data/Journal.hs @@ -984,17 +984,17 @@ journalStyleInfluencingAmounts j = -- 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 -- traverseJournalAmounts. -- journalAmounts :: Journal -> [Amount] -- 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 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, -- processing them with the given applicative function. --