summaryrefslogtreecommitdiff
path: root/lisp/international
diff options
context:
space:
mode:
authorJuri Linkov <juri@jurta.org>2005-11-20 07:48:44 +0000
committerJuri Linkov <juri@jurta.org>2005-11-20 07:48:44 +0000
commit695effccdfe78132059e054a85e9200b868e0621 (patch)
treeb7d122ea72db828c303b4be37c067204908a04c5 /lisp/international
parent9f40939dcdefd5b3eb26e442b1da6cfad60fc48d (diff)
downloademacs-695effccdfe78132059e054a85e9200b868e0621.tar.gz
(encoded-string-description): Use Lisp-readable syntax for hex.
Diffstat (limited to 'lisp/international')
-rw-r--r--lisp/international/mule-cmds.el4
1 files changed, 2 insertions, 2 deletions
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)