diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2019-08-14 11:43:08 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2019-08-14 11:43:08 -0700 |
| commit | e85178c32ac78578fb2a6cda24b5cee106ac98af (patch) | |
| tree | b59c16cae0afb311cd883fa1d2b5fe9a7be00751 | |
| parent | eb23527121e52682c16ad2aa7c149d931c31c57c (diff) | |
| download | pandoc-e85178c32ac78578fb2a6cda24b5cee106ac98af.tar.gz | |
Removed some needless lookaheads in Markdown reader.
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 2 |
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 |