(xml-parse-tag): The document may contain invalid characters.

From ShengHuo ZHU  <zsh@cs.rochester.edu>

diff --git a/lisp/xml.el b/lisp/xml.el
index 25851e2a9ea174d9eb7cf7f99b4134a94fe133cb..a07f449b3176df7c1f979a07914d5c591d70e1d4 100644 (file)
--- a/lisp/xml.el
+++ b/lisp/xml.el
@@ -1,6 +1,6 @@
 ;; @(#) xml.el --- XML parser
 
-;; Copyright (C) 2000 Free Software Foundation, Inc.
+;; Copyright (C) 2000, 2001 Free Software Foundation, Inc.
 
 ;; Author: Emmanuel Briot  <briot@gnat.com>
 ;; Maintainer: Emmanuel Briot <briot@gnat.com>
@@ -272,6 +272,8 @@ Returns one of:
          ;;  This was an invalid start tag
          (error "XML: Invalid attribute list")
          ))))
+   (t ;; This is not a tag.
+    (error "XML: Invalid character."))
    ))
 
 (defun xml-parse-attlist (end)