From 01adac0d5da3fffc92d7a1419b43db8f88b64491 Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Tue, 5 Mar 2002 21:44:01 +0000 Subject: [PATCH] * xml.el (xml-parse-attlist): Accept empty strings. From Max Froumentin . --- lisp/ChangeLog | 5 +++++ lisp/xml.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 980f8171fed..4f4f539e439 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-03-05 ShengHuo ZHU + + * xml.el (xml-parse-attlist): Accept empty strings. + From Max Froumentin . + 2002-03-05 Eli Zaretskii * mouse.el (mouse-show-mark): Remove the no-highlight alternative: diff --git a/lisp/xml.el b/lisp/xml.el index d6d6d80efa9..a495721330f 100644 --- 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 -- 2.39.2