From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Juanma Barranquero Newsgroups: gmane.emacs.bugs Subject: Re: xml.el patches for better spec compliance Date: Thu, 13 Mar 2003 11:31:36 +0100 Sender: bug-gnu-emacs-bounces+gnu-bug-gnu-emacs=m.gmane.org@gnu.org Message-ID: <20030313112802.6A03.LEKTU@terra.es> References: <874r68b8l0.fsf@superman.everybody.org> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset="US-ASCII" Content-Transfer-Encoding: 7bit X-Trace: main.gmane.org 1047551603 17451 80.91.224.249 (13 Mar 2003 10:33:23 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Thu, 13 Mar 2003 10:33:23 +0000 (UTC) Cc: bug-gnu-emacs@gnu.org Original-X-From: bug-gnu-emacs-bounces+gnu-bug-gnu-emacs=m.gmane.org@gnu.org Thu Mar 13 11:33:21 2003 Return-path: Original-Received: from monty-python.gnu.org ([199.232.76.173]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18tQ1Z-0004XA-00 for ; Thu, 13 Mar 2003 11:33:21 +0100 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.10.13) id 18tQ1G-0006Wv-06 for gnu-bug-gnu-emacs@m.gmane.org; Thu, 13 Mar 2003 05:33:02 -0500 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.10.13) id 18tQ0g-0005aI-00 for bug-gnu-emacs@gnu.org; Thu, 13 Mar 2003 05:32:26 -0500 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.10.13) id 18tQ0R-00050S-00 for bug-gnu-emacs@gnu.org; Thu, 13 Mar 2003 05:32:12 -0500 Original-Received: from smtp.terra.es ([213.4.129.129] helo=tsmtp6.mail.isp) by monty-python.gnu.org with esmtp (Exim 4.10.13) id 18tPzt-0004XH-00 for bug-gnu-emacs@gnu.org; Thu, 13 Mar 2003 05:31:37 -0500 Original-Received: from [80.36.30.211] ([80.36.30.211]) by tsmtp6.mail.isp (terra.es) with ESMTP id HBONWM01.HCE; Thu, 13 Mar 2003 11:31:35 +0100 Original-To: Mark A. Hershberger In-Reply-To: <874r68b8l0.fsf@superman.everybody.org> X-Mailer: Becky! ver. 2.05.10 X-BeenThere: bug-gnu-emacs@gnu.org X-Mailman-Version: 2.1b5 Precedence: list List-Id: Bug reports for GNU Emacs, the Swiss army knife of text editors List-Help: List-Post: List-Subscribe: , List-Archive: List-Unsubscribe: , Errors-To: bug-gnu-emacs-bounces+gnu-bug-gnu-emacs=m.gmane.org@gnu.org Xref: main.gmane.org gmane.emacs.bugs:4603 X-Report-Spam: http://spam.gmane.org/gmane.emacs.bugs:4603 On Wed, 12 Mar 2003 15:04:11 -0600, mah@everybody.org (Mark A. Hershberger) wrote: > [This patch replaces the one sent earlier.] [...] > *** 451,456 **** > --- 469,485 ---- > (setq string (replace-match "'" t nil string))) > (while (string-match """ string) > (setq string (replace-match "\"" t nil string))) > + (while (string-match "&#\\([0-9]+\\);" string) > + (setq string (replace-match (char-to-ucs > + (string-to-int > + (match-string-no-properties 1 string))) > + t nil string))) > + (while (string-match "&#x\\([0-9a-fA-F]+\\);" string) > + (setq string (replace-match (char-to-ucs > + (hex-string-to-number > + (match-string-no-properties 1 string))) > + t nil string))) > + > ;; This goes last so it doesn't confuse the matches above. > (while (string-match "&" string) > (setq string (replace-match "&" t nil string))) Are `char-to-ucs' and `hex-string-to-number' XEmacs functions? /L/e/k/t/u