From: Kenichi Handa <handa@m17n.org>
Date: Sun, 28 Sep 2003 23:30:30 +0000 (+0000)
Subject: (encoded-string-description): Prepend "0x" to each encoded byte.
X-Git-Tag: ttn-vms-21-2-B4~8711
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a9f600910a44df3e6a74c6122887e60700ce8b80;p=emacs.git

(encoded-string-description): Prepend "0x" to each encoded byte.
---

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index c9b2330e75f..3a589f378e1 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -2403,7 +2403,7 @@ 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 "%02X" x))))
+				 (format "0x%02X" x))))
      (function (lambda (x) (format "0x%02X" x))))
    str " "))