mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-28 10:56:36 +00:00
Code Issues Releases Activity

(quail-start-translation): Call

Browse Source 
this-single-command-raw-keys instead of this-single-command-keys.
(quail-start-conversion): Likewise.
This commit is contained in:
Kenichi Handa 1998-07-23 05:48:49 +00:00
parent 07474fef28
commit ab6ecce200
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/international/quail.el
View File

@ -903,7 +903,7 @@ The returned value is a Quail map specific to KEY."
(while quail-translating
(let* ((echo-keystrokes 0)
(keyseq (read-key-sequence nil))
(events (this-single-command-keys))
(events (this-single-command-raw-keys))
(cmd (lookup-key translation-keymap keyseq)))
(if (commandp cmd)
(progn
@ -951,7 +951,7 @@ The returned value is a Quail map specific to KEY."
(quail-setup-overlays nil)))
(let* ((echo-keystrokes 0)
(keyseq (read-key-sequence nil))
(events (this-single-command-keys))
(events (this-single-command-raw-keys))
(cmd (lookup-key conversion-keymap keyseq)))
(if (commandp cmd)
(progn