aboutsummaryrefslogtreecommitdiff
path: root/Text/Pandoc/Writers/Texinfo.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Text/Pandoc/Writers/Texinfo.hs')
-rw-r--r--Text/Pandoc/Writers/Texinfo.hs6
1 files changed, 2 insertions, 4 deletions
diff --git a/Text/Pandoc/Writers/Texinfo.hs b/Text/Pandoc/Writers/Texinfo.hs
index a77b19d08..ac8778274 100644
--- a/Text/Pandoc/Writers/Texinfo.hs
+++ b/Text/Pandoc/Writers/Texinfo.hs
@@ -355,10 +355,8 @@ inlineForNode (Link lst _) = inlineListForNode lst
inlineForNode (Image lst _) = inlineListForNode lst
inlineForNode (Note _) = return empty
--- XXX not sure what the complete set of illegal characters is.
-disallowedInNode '.' = True
-disallowedInNode ',' = True
-disallowedInNode _ = False
+-- periods, commas, colons, and parentheses are disallowed in node names
+disallowedInNode c = c `elem` ".,:()"
-- | Convert inline element to Texinfo
inlineToTexinfo :: Inline -- ^ Inline to convert