[Emacs-diffs] Changes to emacs/lisp/international/mule-cmds.el

[Juri Linkov]

Index: emacs/lisp/international/mule-cmds.el
diff -c emacs/lisp/international/mule-cmds.el:1.286 
emacs/lisp/international/mule-cmds.el:1.287
*** emacs/lisp/international/mule-cmds.el:1.286 Sat Nov 19 21:08:21 2005
--- emacs/lisp/international/mule-cmds.el       Sun Nov 20 07:45:19 2005
***************
*** 2647,2654 ****
     (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))))
     str " "))
  
  (defun encode-coding-char (char coding-system)
--- 2647,2654 ----
     (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 "#x%02X" x))))
!      (function (lambda (x) (format "#x%02X" x))))
     str " "))
  
  (defun encode-coding-char (char coding-system)