mirror of
https://github.com/jgm/pandoc.git
synced 2026-08-29 01:41:20 +08:00
Revert "Improve parsing of raw LaTeX blocks..."
This reverts commit 22863a3e12.
This commit is contained in:
@@ -144,17 +144,12 @@ rawLaTeXBlock = do
|
||||
toks <- getInputTokens
|
||||
snd <$> (
|
||||
rawLaTeXParser toks
|
||||
(skipMany1 (try
|
||||
(skipMany (whitespace <|> newlineTok)
|
||||
*> (macroDef (const ())
|
||||
<|> void (controlSeq "makeatletter" <|>
|
||||
controlSeq "mateatother")))
|
||||
<|>
|
||||
(macroDef (const mempty) <|>
|
||||
do choice (map controlSeq
|
||||
["include", "input", "subfile", "usepackage"])
|
||||
skipMany opt
|
||||
braced
|
||||
return mempty)) blocks
|
||||
return mempty) blocks
|
||||
<|> rawLaTeXParser toks
|
||||
(void (environment <|> blockCommand))
|
||||
(mconcat <$> many (block <|> beginOrEndCommand)))
|
||||
|
||||
Reference in New Issue
Block a user