@@ -493,7 +493,7 @@ rawLaTeXEnvironment' = failIfStrict >> rawLaTeXEnvironment
494-- Parse a dashed line with optional trailing spaces; return its length
494-- Parse a dashed line with optional trailing spaces; return its length
495-- and the length including trailing space.
495-- and the length including trailing space.
496−dashedLine ch = try $ do
496+dashedLine ch = do
497 dashes <- many1 (char ch)
497 dashes <- many1 (char ch)
498 sp <- many spaceChar
498 sp <- many spaceChar
499 return $ (length dashes, length $ dashes ++ sp)
499 return $ (length dashes, length $ dashes ++ sp)