From: Kenichi Handa <handa@m17n.org>
Date: Wed, 29 Nov 2000 00:38:36 +0000 (+0000)
Subject: (xml-parse-tag): Fix finding opening tag.  A tag name
X-Git-Tag: emacs-pretest-21.0.93~395
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=af9bd5396c78f6fc4865735247dae16b067acf92;p=emacs.git

(xml-parse-tag): Fix finding opening tag.  A tag name
should not contain `\n'.
---

diff --git a/lisp/xml.el b/lisp/xml.el
index 4a738107410..a7d2ba48ef5 100644
--- a/lisp/xml.el
+++ b/lisp/xml.el
@@ -203,7 +203,7 @@ Returns one of:
    ((looking-at "</")
     '())
    ;;  opening tag
-   ((looking-at "<\\([^/> \t]+\\)")
+   ((looking-at "<\\([^/> \t\n]+\\)")
     (let* ((node-name (match-string 1))
 	   (children (list (intern node-name)))
 	   pos)