summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2016-01-08 20:20:37 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2016-01-08 20:20:37 -0800
commit729911ad74254742251669f27cc432751644d238 (patch)
treee3ce056cccab91bff96269e72ca3f3e0ab0e5ba1 /src/Text/Pandoc
parentd5f67829dc2d60ba558d9136ab31f0ca74f5339a (diff)
Fixed shadowing warning.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/XML.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/XML.hs b/src/Text/Pandoc/XML.hs
index 82ceff126..70d8efba6 100644
--- a/src/Text/Pandoc/XML.hs
+++ b/src/Text/Pandoc/XML.hs
@@ -107,7 +107,7 @@ fromEntities ('&':xs) =
(zs,';':ys) -> (zs,ys)
(zs, ys) -> (zs,ys)
ent' = case ent of
- '#':'X':xs -> '#':'x':xs -- workaround tagsoup bug
+ '#':'X':ys -> '#':'x':ys -- workaround tagsoup bug
'#':_ -> ent
_ -> ent ++ ";"