apply journal updates in the order they were parsed, not the reverse (!)
Fixes the order of include files in stats command.
This commit is contained in:
parent
c2365c3541
commit
9a239789fa
@ -79,7 +79,7 @@ parse _ = -- trace ("running "++format++" reader") .
|
||||
|
||||
-- | Flatten a list of JournalUpdate's into a single equivalent one.
|
||||
combineJournalUpdates :: [JournalUpdate] -> JournalUpdate
|
||||
combineJournalUpdates us = liftM (foldr (.) id) $ sequence us
|
||||
combineJournalUpdates us = liftM (foldr (flip (.)) id) $ sequence us
|
||||
|
||||
-- | Given a JournalUpdate-generating parsec parser, file path and data string,
|
||||
-- parse and post-process a Journal so that it's ready to use, or give an error.
|
||||
|
||||
Loading…
Reference in New Issue
Block a user