[Emacs-diffs] Changes to emacs/lisp/term/mac-win.el

[Kenichi Handa]

Index: emacs/lisp/term/mac-win.el
diff -c emacs/lisp/term/mac-win.el:1.13 emacs/lisp/term/mac-win.el:1.14
*** emacs/lisp/term/mac-win.el:1.13     Fri Oct  4 11:03:02 2002
--- emacs/lisp/term/mac-win.el  Wed Jan 15 00:32:56 2003
***************
*** 205,214 ****
         (function
          (lambda (key val)
            (or (generic-char-p key)
!               (memq (char-charset key)
                      '(ascii eight-bit-control eight-bit-graphic))
!               (set-fontset-font "fontset-mac" key monaco-font))))
!        (get 'mac-roman-encoder 'translation-table)))))
  
  (if (eq system-type 'darwin)
      ;; On Darwin filenames are encoded in UTF-8
--- 205,214 ----
         (function
          (lambda (key val)
            (or (generic-char-p key)
!               (memq (char-charset val)
                      '(ascii eight-bit-control eight-bit-graphic))
!               (set-fontset-font "fontset-mac" val monaco-font))))
!        (get 'mac-roman-decoder 'translation-table)))))
  
  (if (eq system-type 'darwin)
      ;; On Darwin filenames are encoded in UTF-8