From 22259c9379683d5580e238e48af3f58b8ff986d9 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Tue, 21 Sep 2004 02:26:24 +0000 Subject: [PATCH] (describe-char): Checking of quail activation fixed. --- lisp/descr-text.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/descr-text.el b/lisp/descr-text.el index c4758a081ce..8ac2d36334b 100644 --- a/lisp/descr-text.el +++ b/lisp/descr-text.el @@ -525,7 +525,8 @@ as well as widgets, buttons, overlays, and text properties." (push (format "%s;" (pop props)) ps)) (list (cons "Properties" (nreverse ps))))) ("to input" - ,@(let ((key-list (and current-input-method + ,@(let ((key-list (and (eq input-method-function + 'quail-input-method) (quail-find-key char)))) (if (consp key-list) (list "type" -- 2.39.2