diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-12-30 22:43:46 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-12-30 22:43:46 -0800 |
commit | d6d4388f6f738f99c4b337645a1de715e699114d (patch) | |
tree | a884a466edab25fa1305ed760b73e946558ebc81 | |
parent | 475b0dcb66c2a7cdc78022b4dcb7c7fbb17ab309 (diff) |
LaTeX reader: Simplified a check for raw tex command.
-rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index e0972bb6c..a0447962c 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -280,12 +280,12 @@ rawLaTeXBlock = do rawLaTeXInline :: (PandocMonad m, HasMacros s, HasReaderOptions s) => ParserT String s m String rawLaTeXInline = do - lookAhead (try (char '\\' >> letter) <|> char '$') + lookAhead (try (char '\\' >> letter)) rawLaTeXParser (inlineEnvironment <|> inlineCommand') >>= applyMacros . snd inlineCommand :: PandocMonad m => ParserT String ParserState m Inlines inlineCommand = do - lookAhead (try (char '\\' >> letter) <|> char '$') + lookAhead (try (char '\\' >> letter)) fst <$> rawLaTeXParser (inlineEnvironment <|> inlineCommand') tokenize :: SourceName -> Text -> [Tok] |