[Emacs-diffs] Changes to emacs/lisp/international/ucs-tables.el

[Kenichi Handa]

Index: emacs/lisp/international/ucs-tables.el
diff -c emacs/lisp/international/ucs-tables.el:1.39 
emacs/lisp/international/ucs-tables.el:1.40
*** emacs/lisp/international/ucs-tables.el:1.39 Fri May 13 06:03:46 2005
--- emacs/lisp/international/ucs-tables.el      Fri May 27 11:21:36 2005
***************
*** 2517,2523 ****
        (if (and table (symbolp table))
            (setq table (get table 'translation-table)))
        (unless (char-table-p table)
!         (setq table (coding-system-get cs 'translation-table-for-input)))
        (when (char-table-p table)
          (if buffer
              (with-current-buffer buffer
--- 2517,2525 ----
        (if (and table (symbolp table))
            (setq table (get table 'translation-table)))
        (unless (char-table-p table)
!         (setq table (coding-system-get cs 'translation-table-for-input))
!         (if (and table (symbolp table))
!             (setq table (get table 'translation-table))))
        (when (char-table-p table)
          (if buffer
              (with-current-buffer buffer