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

[Kenichi Handa]

Index: emacs/lisp/international/quail.el
diff -c emacs/lisp/international/quail.el:1.123 
emacs/lisp/international/quail.el:1.124
*** emacs/lisp/international/quail.el:1.123     Mon Oct 28 13:29:36 2002
--- emacs/lisp/international/quail.el   Wed Nov  6 18:36:10 2002
***************
*** 1279,1287 ****
    (let* ((events (mapcar
                  (lambda (c)
                    ;; This gives us the chance to unify on input
!                   ;; (e.g. using ucs-tables.el).
!                   (or (and translation-table-for-input
!                            (aref translation-table-for-input c))
                        c))
                  str))
         (len (length str))
--- 1279,1289 ----
    (let* ((events (mapcar
                  (lambda (c)
                    ;; This gives us the chance to unify on input
!                   ;; (e.g. using ucs-tables.el).  Fixme: The result
!                   ;; of Quail input doesn't currently go through
!                   ;; `keyboard-translate-table'.
!                   (or (and (char-table-p keyboard-translate-table)
!                            (aref keyboard-translate-table c))
                        c))
                  str))
         (len (length str))