changeset 50210:575aa6820adc

(xml-parse-attlist): typo in attribute parsing.
author Juanma Barranquero <lekktu@gmail.com>
date Thu, 20 Mar 2003 18:01:04 +0000
parents 849457815733
children 64a900db8d32
files lisp/xml.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/xml.el	Wed Mar 19 23:36:15 2003 +0000
+++ b/lisp/xml.el	Thu Mar 20 18:01:04 2003 +0000
@@ -294,7 +294,7 @@
       ;;  or a simple word ?
       (if (looking-at "\"\\([^\"]*\\)\"")
 	  (setq start-pos (match-beginning 0))
-	(if (looking-at "'\\([^']*\\)")
+	(if (looking-at "'\\([^']*\\)'")
 	    (setq start-pos (match-beginning 0))
 	  (error "XML: Attribute values must be given between quotes")))
 
@@ -314,7 +314,7 @@
       (goto-char start-pos)
       (if (looking-at "\"\\([^\"]*\\)\"")
 	  (goto-char (match-end 0))
-	(if (looking-at "'\\([^']*\\)")
+	(if (looking-at "'\\([^']*\\)'")
 	    (goto-char (match-end 0))))
 
       (goto-char (- (re-search-forward "[^ \t\n\r]") 1))