aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2013-06-11 10:16:54 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2013-06-11 10:16:54 -0700
commit50ba5a801a2593598f1484c7ce4aa941f00ed0b0 (patch)
tree1d9505a088c0c47eb53304206c27935266aebafa /src/Text/Pandoc
parent96f25f924a6de58bc313d78697f0f0f65307d891 (diff)
downloadpandoc-50ba5a801a2593598f1484c7ce4aa941f00ed0b0.tar.gz
Textile reader: Correctly handle entities.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/Textile.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Textile.hs b/src/Text/Pandoc/Readers/Textile.hs
index 8d259482d..22ec52362 100644
--- a/src/Text/Pandoc/Readers/Textile.hs
+++ b/src/Text/Pandoc/Readers/Textile.hs
@@ -374,6 +374,7 @@ inlineParsers = [ str
, link
, image
, mark
+ , (Str . (:[])) <$> characterReference
, smartPunctuation inline
, symbol
]
@@ -424,7 +425,7 @@ note = try $ do
-- | Special chars
markupChars :: [Char]
-markupChars = "\\*#_@~-+^|%=[]"
+markupChars = "\\*#_@~-+^|%=[]&"
-- | Break strings on following chars. Space tab and newline break for
-- inlines breaking. Open paren breaks for mark. Quote, dash and dot