Mercurial > emacs
comparison lisp/international/quail.el @ 19792:953af2c5a9d1
(quail-execute-non-quail-command): Call quail-terminate-translation.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 07 Sep 1997 04:31:35 +0000 |
| parents | b1774d359a3d |
| children | 66b7051ac215 |
comparison
equal
deleted
inserted
replaced
| 19791:1366d82c1d3f | 19792:953af2c5a9d1 |
|---|---|
| 589 (defun quail-execute-non-quail-command () | 589 (defun quail-execute-non-quail-command () |
| 590 "Execute one non-Quail command out of Quail mode. | 590 "Execute one non-Quail command out of Quail mode. |
| 591 The current translation and conversion are terminated." | 591 The current translation and conversion are terminated." |
| 592 (interactive) | 592 (interactive) |
| 593 (setq unread-command-events (cons last-input-event unread-command-events)) | 593 (setq unread-command-events (cons last-input-event unread-command-events)) |
| 594 (quail-terminate-translation) | |
| 594 (quail-delete-overlays) | 595 (quail-delete-overlays) |
| 595 (setq overriding-terminal-local-map nil) | 596 (setq overriding-terminal-local-map nil) |
| 596 (if (buffer-live-p quail-guidance-buf) | 597 (if (buffer-live-p quail-guidance-buf) |
| 597 (save-excursion | 598 (save-excursion |
| 598 (set-buffer quail-guidance-buf) | 599 (set-buffer quail-guidance-buf) |