diff options
-rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 1 | ||||
-rw-r--r-- | test/command/4091.md | 6 |
2 files changed, 7 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index 3bc59f262..d1d9682c3 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -1245,6 +1245,7 @@ inlineCommands = M.union inlineLanguageCommands $ M.fromList $ , ("textup", extractSpaces (spanWith ("",["upright"],[])) <$> tok) , ("texttt", ttfamily) , ("sout", extractSpaces strikeout <$> tok) + , ("alert", skipangles >> spanWith ("",["alert"],[]) <$> tok) -- beamer , ("lq", return (str "‘")) , ("rq", return (str "’")) , ("textquoteleft", return (str "‘")) diff --git a/test/command/4091.md b/test/command/4091.md new file mode 100644 index 000000000..13f3323d1 --- /dev/null +++ b/test/command/4091.md @@ -0,0 +1,6 @@ +``` +% pandoc -f latex +\alert<3>{foo} +^D +<p><span class="alert">foo</span></p> +``` |