From 695effccdfe78132059e054a85e9200b868e0621 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Sun, 20 Nov 2005 07:48:44 +0000 Subject: (encoded-string-description): Use Lisp-readable syntax for hex. --- lisp/international/mule-cmds.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/international') diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index c84a66bcd63..ba9ec37a042 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -2647,8 +2647,8 @@ It can be retrieved with `(get-char-code-property CHAR PROPNAME)'." (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) -- cgit v1.2.1