diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2008-02-24 18:21:19 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2008-02-24 18:21:19 +0000 |
commit | 94dcbab55fd784bab227b73e006677417f3b0615 (patch) | |
tree | dca5606e0534938429ecf9eff6b62e77a439e377 /Text/Pandoc/Writers/Texinfo.hs | |
parent | 839f77d81ecd742d6368f8b140eeccd37d8a80e7 (diff) | |
download | pandoc-94dcbab55fd784bab227b73e006677417f3b0615.tar.gz |
Modified disallowedInNode in Texinfo writer to correct list of disallowed characters.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1246 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'Text/Pandoc/Writers/Texinfo.hs')
-rw-r--r-- | Text/Pandoc/Writers/Texinfo.hs | 6 |
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 |