Re: xml.el patches for better spec compliance

[Juanma Barranquero]

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