module Main(main) where import Text.ParserCombinators.Parsec parseToNewLine = do line <- manyTill anyChar newline return line keyValue = do fieldName <- many letter spaces char '=' spaces fieldValue <- parseToNewLine return (fieldName,fieldValue) main = parseTest keyValue "key=\n" I don't understand why te code above doesn't parse to ("key","") parseToNewLine "\n" parses to "" parseTest keyValue "a=b\n" works fine and parses to ("a","b") Kees