Fix document parsing error, fix #993
commitffbf8054f9257ed6f6389ec0672326d6092207c3
authorEvan Czaplicki <info@elm-lang.org>
dateMon 20 Jul 2015, 01:29 (11 years ago)
parent95f58d8
src/Parse/Helpers.hs+1−5
@@ -381,11 +381,7 @@ docComment :: IParser String
381381docComment =
382382 do try (string "{-|")
383383 contents <- closeComment
384−
385− let reversed =
386− dropWhile (`elem` " \n\r") . drop 2 $ reverse contents
387−
388− return $ dropWhile (==' ') (reverse reversed)
384+ return (init (init contents))
389385
390386
391387multiComment :: IParser String