procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(xml-parse-attlist): typo in attribute parsing.

Browse source
This commit is contained in:
Juanma Barranquero 2003-03-20 18:01:58 +00:00
parent 76b7fded09
commit f0ec17115f
2 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
2003-03-20 Mark A. Hershberger <mah@everybody.org>
* xml.el (xml-parse-attlist): Fix typo in attribute parsing.
2003-03-20 Kenichi Handa <handa@m17n.org>
* international/utf-8.el (ccl-decode-mule-utf-8): Fix a bug in

4
lisp/xml.el
View file

@ -294,7 +294,7 @@ Leaves the point on the first non-blank character after the tag."
;; 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 @@ Leaves the point on the first non-blank character after the tag."
(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))