Mercurial > emacs
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))