changeset 67036:d7b4fada70f0

(encoded-string-description): Use Lisp-readable syntax for hex.
author Juri Linkov <juri@jurta.org>
date Sun, 20 Nov 2005 07:45:19 +0000
parents 0f0c4f1205cd
children 9e44f3171950
files lisp/international/mule-cmds.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el	Sun Nov 20 07:43:44 2005 +0000
+++ b/lisp/international/mule-cmds.el	Sun Nov 20 07:45:19 2005 +0000
@@ -2647,8 +2647,8 @@
    (if (and coding-system (eq (coding-system-type coding-system) 2))
        ;; Try to get a pretty description for ISO 2022 escape sequences.
        (function (lambda (x) (or (cdr (assq x iso-2022-control-alist))
-				 (format "0x%02X" x))))
-     (function (lambda (x) (format "0x%02X" x))))
+				 (format "#x%02X" x))))
+     (function (lambda (x) (format "#x%02X" x))))
    str " "))
 
 (defun encode-coding-char (char coding-system)