@@ -1209,6 +1209,10 @@ inlineCommands = M.fromList $
1209 , ("textup", extractSpaces (spanWith ("",["upright"],[])) <$> tok)
1209 , ("textup", extractSpaces (spanWith ("",["upright"],[])) <$> tok)
1210 , ("texttt", ttfamily)
1210 , ("texttt", ttfamily)
1211 , ("sout", extractSpaces strikeout <$> tok)
1211 , ("sout", extractSpaces strikeout <$> tok)
1212+ , ("textquoteleft", return (str "‘"))
1213+ , ("textquoteright", return (str "’"))
1214+ , ("textquotedblleft", return (str "“"))
1215+ , ("textquotedblright", return (str "”"))
1212 , ("textsuperscript", extractSpaces superscript <$> tok)
1216 , ("textsuperscript", extractSpaces superscript <$> tok)
1213 , ("textsubscript", extractSpaces subscript <$> tok)
1217 , ("textsubscript", extractSpaces subscript <$> tok)
1214 , ("textbackslash", lit "\\")
1218 , ("textbackslash", lit "\\")