mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(xml-parse-tag): Use eq on char-after's return value.

Browse source
This commit is contained in:
Stefan Monnier 2001-10-18 20:24:09 +00:00
parent 97f4db8c94
commit e54030af30
2 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/xml.el
View file

@ -230,7 +230,7 @@ Returns one of:
(append children '("")))
;; is this a valid start tag ?
(if (= (char-after) ?>)
(if (eq (char-after) ?>)
(progn
(forward-char 1)
(skip-chars-forward " \t\n")