[Emacs-diffs] Changes to emacs/lisp/descr-text.el

[Kenichi Handa]

Index: emacs/lisp/descr-text.el
diff -c emacs/lisp/descr-text.el:1.26 emacs/lisp/descr-text.el:1.27
*** emacs/lisp/descr-text.el:1.26       Sun May 23 20:59:28 2004
--- emacs/lisp/descr-text.el    Tue Sep 21 02:26:24 2004
***************
*** 525,531 ****
                    (push (format "%s;" (pop props)) ps))
                  (list (cons "Properties" (nreverse ps)))))
            ("to input"
!            ,@(let ((key-list (and current-input-method
                                    (quail-find-key char))))
                 (if (consp key-list)
                     (list "type"
--- 525,532 ----
                    (push (format "%s;" (pop props)) ps))
                  (list (cons "Properties" (nreverse ps)))))
            ("to input"
!            ,@(let ((key-list (and (eq input-method-function
!                                       'quail-input-method)
                                    (quail-find-key char))))
                 (if (consp key-list)
                     (list "type"