@@ -287,8 +287,8 @@ spaces =
287287forcedWS :: IParser String
288288forcedWS =
289289 choice
290− [ try $ (++) <$> spaces <*> (concat <$> many nl_space)
291− , try $ concat <$> many1 nl_space
290+ [ (++) <$> spaces <*> (concat <$> many nl_space)
291+ , concat <$> many1 nl_space
292292 ]
293293 where
294294 nl_space =