From ce800f71215b5f1f747554d4e6fb7a77b24f5367 Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Tue, 28 Aug 2007 07:20:47 +0000 Subject: Removed unneeded 'try' in dashedLine. git-svn-id: https://pandoc.googlecode.com/svn/trunk@937 788f1e2b-df1e-0410-8736-df70ead52e1b --- src/Text/Pandoc/Readers/Markdown.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc') 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) -- cgit v1.2.3