mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-01 20:06:00 +00:00
Code Issues Releases Activity

(xml-name-regexp): Wrap in `eval-and-compile'.

Browse Source
This commit is contained in:
John Paul Wallington 2003-05-19 17:45:27 +00:00
parent e54165ff61
commit ab16145759
2 changed files with 6 additions and 1 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-05-19 John Paul Wallington <jpw@gnu.org>
* xml.el (xml-name-regexp): Wrap in `eval-and-compile'.
2003-05-19 Dave Love <fx@gnu.org>
* xml.el: Doc fixes.

3
lisp/xml.el
View File

@ -176,7 +176,8 @@ If PARSE-DTD is non-nil, the DTD is parsed rather than skipped."
;; XML [5]
;; Note that [:alpha:] matches all multibyte chars with word syntax.
(defconst xml-name-regexp "[[:alpha:]_:][[:alnum:]._:-]*")
(eval-and-compile
(defconst xml-name-regexp "[[:alpha:]_:][[:alnum:]._:-]*"))
;; Fixme: This needs re-writing to deal with the XML grammar properly, i.e.
;; document ::= prolog element Misc*