summaryrefslogtreecommitdiff
path: root/lisp/xml.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@gnu.org>2012-06-24 23:06:24 +0800
committerChong Yidong <cyd@gnu.org>2012-06-24 23:06:24 +0800
commit772b2e2ce207fd747583aa51e3495aa37b1eede1 (patch)
tree12215bfae7880a4ecc4fbd130738515e8ca6b942 /lisp/xml.el
parent0eb4e0df7aeb678467245ef9161a24016dc447c7 (diff)
downloademacs-772b2e2ce207fd747583aa51e3495aa37b1eede1.tar.gz
* xml.el (xml-parse-tag): Corrrectly handle comment embedded in non-tag text.
Diffstat (limited to 'lisp/xml.el')
-rw-r--r--lisp/xml.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/xml.el b/lisp/xml.el
index cb56f023af0..d1e824c4ece 100644
--- a/lisp/xml.el
+++ b/lisp/xml.el
@@ -424,7 +424,8 @@ Returns one of:
(search-forward "-->")
(skip-syntax-forward " ")
(unless (eobp)
- (xml-parse-tag parse-dtd xml-ns)))
+ (let ((xml-sub-parser t))
+ (xml-parse-tag parse-dtd xml-ns))))
;; end tag
((looking-at "</")
'())