[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: xml.el patches for better spec compliance
From: |
Juanma Barranquero |
Subject: |
Re: xml.el patches for better spec compliance |
Date: |
Sat, 15 Mar 2003 00:51:56 +0100 |
On Fri, 14 Mar 2003 11:56:21 -0600, mah@everybody.org (Mark A. Hershberger)
wrote:
> + (while (string-match "&#\\([0-9]+\\);" string)
> + (setq string (replace-match (xml-ucs-to-string
> + (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 (xml-ucs-to-string
> + (hex-string-to-number
> + (match-string-no-properties 1 string)))
> + t nil string)))
> +
hex-string-to-number still doesn't exists, but you can use
(string-to-number
(match-string-no-properties 1 string)
16)
/L/e/k/t/u