@@ -40,7 +40,7 @@ import Text.Pandoc.Parsing
4040import Data.Maybe ( fromMaybe )
4141import Data.Char ( chr, toUpper )
4242import Data.List ( isPrefixOf, isSuffixOf )
43−import Control.Monad ( when )
43+import Control.Monad ( when, liftM )
4444
4545-- | Parse LaTeX from string and return 'Pandoc' document.
4646readLaTeX :: ParserState -- ^ Parser state, including options for parser
@@ -906,7 +906,7 @@ rawLaTeXInline' :: GenParser Char ParserState Inline
906906rawLaTeXInline' = do
907907 notFollowedBy' $ oneOfStrings ["\\begin", "\\end", "\\item", "\\ignore",
908908 "\\section"]
909− rawLaTeXInline
909+ rawLaTeXInline <|> liftM TeX (bracketedText '{' '}')
910910
911911-- | Parse any LaTeX command and return it in a raw TeX inline element.
912912rawLaTeXInline :: GenParser Char ParserState Inline