@@ -1245,6 +1245,7 @@ inlineCommands = M.union inlineLanguageCommands $ M.fromList $
12451245 , ("textup", extractSpaces (spanWith ("",["upright"],[])) <$> tok)
12461246 , ("texttt", ttfamily)
12471247 , ("sout", extractSpaces strikeout <$> tok)
1248+ , ("alert", skipangles >> spanWith ("",["alert"],[]) <$> tok) -- beamer
12481249 , ("lq", return (str "‘"))
12491250 , ("rq", return (str "’"))
12501251 , ("textquoteleft", return (str "‘"))