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