* xml.el (xml-parse-attlist): Accept empty strings.

	From Max Froumentin <mf@w3.org>.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 980f8171fed50e3cb5796582676a281541dd7491..4f4f539e4398b9d05eb5b1aaf30b84f0d1edf24b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-03-05  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * xml.el (xml-parse-attlist): Accept empty strings.
+       From Max Froumentin <mf@w3.org>.
+
 2002-03-05  Eli Zaretskii  <eliz@is.elta.co.il>
 
        * mouse.el (mouse-show-mark): Remove the no-highlight alternative:

diff --git a/lisp/xml.el b/lisp/xml.el
index d6d6d80efa9934bc0f1b102edbe6e7033647688f..a495721330fc54279706a98f72367d3214d2c113 100644 (file)
--- a/lisp/xml.el
+++ b/lisp/xml.el
@@ -288,8 +288,8 @@ Leaves the point on the first non-blank character after the tag."
 
       ;; Do we have a string between quotes (or double-quotes),
       ;;  or a simple word ?
-      (unless (looking-at "\"\\([^\"]+\\)\"")
-       (unless (looking-at "'\\([^']+\\)'")
+      (unless (looking-at "\"\\([^\"]*\\)\"")
+       (unless (looking-at "'\\([^']*\\)'")
          (error "XML: Attribute values must be given between quotes")))
 
       ;; Each attribute must be unique within a given element