(quail-show-key): Signal an error if the
current input method is not using Quail.
This commit is contained in:
parent
a86bd65016
commit
fdb594455b
1 changed files with 2 additions and 0 deletions
|
@ -2772,6 +2772,8 @@ If CHAR is an ASCII character and can be input by typing itself, return t."
|
|||
(interactive)
|
||||
(or current-input-method
|
||||
(error "No input method is activated"))
|
||||
(or (assoc current-input-method quail-package-alist)
|
||||
(error "The current input method is not using Quail."))
|
||||
(let* ((char (following-char))
|
||||
(key-list (quail-find-key char)))
|
||||
(cond ((consp key-list)
|
||||
|
|
Loading…
Add table
Reference in a new issue