# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 954760318 0
# Node ID cb1aa1596ccab9ed91b1f3ed946e6f0d521d0e95
# Parent  537459659dffaaf3a0c0846142fe2f4cf889ed5d
(encoded-string-description): Use uppercase letters for hexadecimal
format.

diff -r 537459659dff -r cb1aa1596cca lisp/international/mule-cmds.el
--- a/lisp/international/mule-cmds.el	Mon Apr 03 11:10:05 2000 +0000
+++ b/lisp/international/mule-cmds.el	Mon Apr 03 11:11:58 2000 +0000
@@ -1820,7 +1820,7 @@
        ;; 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))))
-     (function (lambda (x) (format "0x%02x" x))))
+     (function (lambda (x) (format "0x%02X" x))))
    str " "))
 
 (defun encode-coding-char (char coding-system)