From ade76da78cae90f11a00b229718c765b339ab0cb Mon Sep 17 00:00:00 2001 From: Andrea Rossato Date: Thu, 11 Feb 2010 14:51:18 +0100 Subject: fix issue 19 - a small reegression in the config parser Ignore-this: cea42efaa2e4c13ed3580154172008592d6e4970 darcs-hash:20100211135118-d6583-5be151b1907f91dec13ed555c47bd1c83119ad0d.gz --- Parsers.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Parsers.hs b/Parsers.hs index 78b4f3e..b969c8b 100644 --- a/Parsers.hs +++ b/Parsers.hs @@ -147,7 +147,7 @@ parseConfig = runParser parseConf fields "Config" . stripComments pLowerOnStart = field lowerOnStart "lowerOnStart" $ tillFieldEnd >>= read' "lowerOnStart" pCommands = field commands "commands" $ readCommands - tillFieldEnd = many $ noneOf ",} \n\r" + tillFieldEnd = many $ noneOf ",}\n\r" commandsEnd = wrapSkip (string "]") >> oneOf "}," readCommands = manyTill anyChar (try commandsEnd) >>= read' commandsErr . flip (++) "]" -- cgit v1.2.3