Mercurial > emacs
diff lisp/xml.el @ 91342:3ec2fe8547cf
* xml.el (xml-escape-string): Don't do any encoding changes on the string.
author | Mark A. Hershberger <mah@everybody.org> |
---|---|
date | Thu, 17 Jan 2008 17:21:34 +0000 |
parents | 606f2d163a64 |
children | ee5932bf781d |
line wrap: on
line diff
--- a/lisp/xml.el Wed Jan 16 02:31:34 2008 +0000 +++ b/lisp/xml.el Thu Jan 17 17:21:34 2008 +0000 @@ -852,10 +852,9 @@ (if (rassoc char xml-entity-alist) (concat "&" (car (rassoc char xml-entity-alist)) ";") char))) - (if (multibyte-string-p string) - (encode-coding-string string 'utf-8) - string) - "")) + ;; This differs from the non-unicode branch. Just + ;; grabbing the string works here. + string "")) (defun xml-debug-print-internal (xml indent-string) "Outputs the XML tree in the current buffer.