add case for "variable" class

This commit is contained in:
Gokul Rajiv
2024-01-23 14:13:51 -08:00
committed by John MacFarlane
parent 3e54d3a45d
commit e9bd6285e3
+3
View File
@@ -446,6 +446,9 @@ inlineToTexinfo (Subscript lst) = do
inlineToTexinfo (SmallCaps lst) =
inCmd "sc" <$> inlineListToTexinfo lst
inlineToTexinfo (Code (_, cls , _) str) | T.pack "variable" `elem` cls =
return $ literal $ "@code{@var{" <> stringToTexinfo str <> "}}"
inlineToTexinfo (Code _ str) =
return $ literal $ "@code{" <> stringToTexinfo str <> "}"