From e9bd6285e3cd645715fd8fbcfe624f7c6b97e698 Mon Sep 17 00:00:00 2001
From: Gokul Rajiv <gokul.rajiv99@gmail.com>
Date: Mon, 22 Jan 2024 23:11:37 +0800
Subject: add case for "variable" class

---
 src/Text/Pandoc/Writers/Texinfo.hs | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'src/Text')

diff --git a/src/Text/Pandoc/Writers/Texinfo.hs b/src/Text/Pandoc/Writers/Texinfo.hs
index 4436ca1b4..710665099 100644
--- a/src/Text/Pandoc/Writers/Texinfo.hs
+++ b/src/Text/Pandoc/Writers/Texinfo.hs
@@ -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 <> "}"
 
-- 
cgit v1.2.3