aboutsummaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2019-08-14 11:43:08 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2019-08-14 11:43:08 -0700
commite85178c32ac78578fb2a6cda24b5cee106ac98af (patch)
treeb59c16cae0afb311cd883fa1d2b5fe9a7be00751 /src/Text
parenteb23527121e52682c16ad2aa7c149d931c31c57c (diff)
downloadpandoc-e85178c32ac78578fb2a6cda24b5cee106ac98af.tar.gz
Removed some needless lookaheads in Markdown reader.
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/Readers/Markdown.hs2
1 files changed, 0 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index 3d2ba490d..d688e3d1d 100644
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@@ -1138,7 +1138,6 @@ rawVerbatimBlock = htmlInBalanced isVerbTag
rawTeXBlock :: PandocMonad m => MarkdownParser m (F Blocks)
rawTeXBlock = do
guardEnabled Ext_raw_tex
- lookAhead $ try $ char '\\' >> letter
result <- (B.rawBlock "tex" . trim . concat <$>
many1 ((++) <$> rawConTeXtEnvironment <*> spnl'))
<|> (B.rawBlock "tex" . trim . concat <$>
@@ -1929,7 +1928,6 @@ inlineNote = try $ do
rawLaTeXInline' :: PandocMonad m => MarkdownParser m (F Inlines)
rawLaTeXInline' = try $ do
guardEnabled Ext_raw_tex
- lookAhead $ try $ char '\\' >> letter
notFollowedBy' rawConTeXtEnvironment
s <- rawLaTeXInline
return $ return $ B.rawInline "tex" s -- "tex" because it might be context