From e85178c32ac78578fb2a6cda24b5cee106ac98af Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Wed, 14 Aug 2019 11:43:08 -0700
Subject: Removed some needless lookaheads in Markdown reader.

---
 src/Text/Pandoc/Readers/Markdown.hs | 2 --
 1 file changed, 2 deletions(-)

(limited to 'src/Text/Pandoc')

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
-- 
cgit v1.2.3