diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index e6914ce66..829600712 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -493,7 +493,7 @@ rawLaTeXEnvironment' = failIfStrict >> rawLaTeXEnvironment -- Parse a dashed line with optional trailing spaces; return its length -- and the length including trailing space. -dashedLine ch = try $ do +dashedLine ch = do dashes <- many1 (char ch) sp <- many spaceChar return $ (length dashes, length $ dashes ++ sp) |