# HG changeset patch # User Juri Linkov # Date 1132472719 0 # Node ID d7b4fada70f06531347288fa661e3fed1fed61df # Parent 0f0c4f1205cd9464679fe232bd281170080bd888 (encoded-string-description): Use Lisp-readable syntax for hex. diff -r 0f0c4f1205cd -r d7b4fada70f0 lisp/international/mule-cmds.el --- 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)