simonmichael/hledger
1
1
Fork 0
mirror of https://github.com/simonmichael/hledger.git synced 2024-12-29 05:11:33 +03:00
Code Issues Projects Releases Wiki Activity

lib: replace notChar for backwards compatibility with megaparsec 5

Browse Source
This commit is contained in:
Alex Chen 2018-05-16 21:35:53 -06:00 committed by Simon Michael
parent 728f185508
commit 31b72f0415
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1024,10 +1024,11 @@ bracketedpostingdatesp
:: Monad m => Maybe Day -> ErroringJournalParser m [(TagName,Day)]
bracketedpostingdatesp mdefdate = do
-- pdbg 0 $ "bracketedpostingdatesp"
skipMany $ notChar '['
skipMany $ noneOf ['[']
fmap concat
$ sepEndBy (try (bracketeddatetagsp mdefdate) <|> char '[' *> pure [])
(skipMany $ notChar '[')
(skipMany $ noneOf ['['])
-- using noneOf ['['] in place of notChar '[' for backwards compatibility
--- ** bracketed dates