[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r108812: xml.el: Fix last change.
From: |
Chong Yidong |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r108812: xml.el: Fix last change. |
Date: |
Sat, 30 Jun 2012 21:57:55 +0800 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 108812
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Sat 2012-06-30 21:57:55 +0800
message:
xml.el: Fix last change.
modified:
lisp/xml.el
=== modified file 'lisp/xml.el'
--- a/lisp/xml.el 2012-06-30 11:33:22 +0000
+++ b/lisp/xml.el 2012-06-30 13:57:55 +0000
@@ -722,9 +722,8 @@
"Return the replacement text for the entity value STRING.
The replacement text is obtained by replacing character
references and parameter-entity references."
- (let ((ref-re (eval-when-compile
- (concat "\\(?:&#\\([0-9]+\\)\\|&#x\\([0-9a-fA-F]+\\)\\|%\\("
- xml-name-re "\\)\\);")))
+ (let ((ref-re (concat "\\(?:&#\\([0-9]+\\)\\|&#x\\([0-9a-fA-F]+\\)\\|%\\("
+ xml-name-re "\\)\\);"))
children)
(while (string-match ref-re string)
(push (substring string 0 (match-beginning 0)) children)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r108812: xml.el: Fix last change.,
Chong Yidong <=