From c3680b868ba6625b14426fee780974c7af619db0 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Fri, 28 Feb 2020 01:54:26 -0800 Subject: [PATCH] lib: Hledger.Utils.Parse: restofline can go to eof also --- hledger-lib/Hledger/Utils/Parse.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hledger-lib/Hledger/Utils/Parse.hs b/hledger-lib/Hledger/Utils/Parse.hs index ee8850ec4..d097003f1 100644 --- a/hledger-lib/Hledger/Utils/Parse.hs +++ b/hledger-lib/Hledger/Utils/Parse.hs @@ -127,7 +127,7 @@ spacenonewline :: (Stream s, Char ~ Token s) => ParsecT CustomErr s m Char spacenonewline = satisfy isNonNewlineSpace restofline :: TextParser m String -restofline = anySingle `manyTill` newline +restofline = anySingle `manyTill` eolof eolof :: TextParser m () eolof = (newline >> return ()) <|> eof