From 31b72f0415c6b94f3c86c9e30bd068df231747da Mon Sep 17 00:00:00 2001 From: Alex Chen Date: Wed, 16 May 2018 21:35:53 -0600 Subject: [PATCH] lib: replace notChar for backwards compatibility with megaparsec 5 --- hledger-lib/Hledger/Read/Common.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/hledger-lib/Hledger/Read/Common.hs b/hledger-lib/Hledger/Read/Common.hs index 6b4e5f853..b191d6bb5 100644 --- a/hledger-lib/Hledger/Read/Common.hs +++ b/hledger-lib/Hledger/Read/Common.hs @@ -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