bug-gnu-emacs
[Top][All Lists]
Advanced

[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: Thu, 13 Mar 2003 11:31:36 +0100

On Wed, 12 Mar 2003 15:04:11 -0600, address@hidden (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





reply via email to

[Prev in Thread] Current Thread [Next in Thread]