[Emacs-diffs] /srv/bzr/emacs/trunk r108718: * xml.el (xml-parse-tag): Corrrectly handle comment embedded in non-tag text.

[Chong Yidong]

------------------------------------------------------------
revno: 108718
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Sun 2012-06-24 23:06:24 +0800
message:
  * xml.el (xml-parse-tag): Corrrectly handle comment embedded in non-tag text.
modified:
  lisp/ChangeLog
  lisp/xml.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-06-23 16:58:13 +0000
+++ b/lisp/ChangeLog    2012-06-24 15:06:24 +0000
@@ -1,3 +1,8 @@
+2012-06-24  Chong Yidong  <address@hidden>
+
+       * xml.el (xml-parse-tag): Correctly handle comment embedded in
+       non-tag text.
+
 2012-06-23  Juanma Barranquero  <address@hidden>
 
        * makefile.w32-in (COMPILE_FIRST): Synch with changes in revno:108688.

=== modified file 'lisp/xml.el'
--- a/lisp/xml.el       2012-04-21 09:53:37 +0000
+++ b/lisp/xml.el       2012-06-24 15:06:24 +0000
@@ -424,7 +424,8 @@
       (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 "</")
       '())