aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-08-28 07:20:47 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-08-28 07:20:47 +0000
commitce800f71215b5f1f747554d4e6fb7a77b24f5367 (patch)
tree89cbe6bc61670ce9f5a33eb1f59ffe0654829840
parent3e337eb9c86e6776cea1c4f4770d5a48d084aafb (diff)
downloadpandoc-ce800f71215b5f1f747554d4e6fb7a77b24f5367.tar.gz
Removed unneeded 'try' in dashedLine.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@937 788f1e2b-df1e-0410-8736-df70ead52e1b
-rw-r--r--src/Text/Pandoc/Readers/Markdown.hs2
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)