diff options
| author | Richard M. Stallman | 1993-03-06 06:13:50 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-03-06 06:13:50 +0000 |
| commit | 383aee86216dfa30202f761f779b8744c0d19606 (patch) | |
| tree | 04ab4e417fc2d54b50ad303bcbbfc8d598a0dc5c | |
| parent | bfd72d065f00149129866d90a774f0e58d64f6d5 (diff) | |
| download | emacs-383aee86216dfa30202f761f779b8744c0d19606.tar.gz emacs-383aee86216dfa30202f761f779b8744c0d19606.zip | |
(te-escape-extended-command-unread): Handle any key sequence.
| -rw-r--r-- | lisp/terminal.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/terminal.el b/lisp/terminal.el index 07e03ff9069..c27adcfdd52 100644 --- a/lisp/terminal.el +++ b/lisp/terminal.el | |||
| @@ -223,7 +223,7 @@ Other chars following \"%s\" are interpreted as follows:\n" | |||
| 223 | ;; not used. | 223 | ;; not used. |
| 224 | (defun te-escape-extended-command-unread () | 224 | (defun te-escape-extended-command-unread () |
| 225 | (interactive) | 225 | (interactive) |
| 226 | (setq unread-command-events (list last-input-char)) | 226 | (setq unread-command-events (listify-key-sequence (this-command-keys))) |
| 227 | (te-escape-extended-command)) | 227 | (te-escape-extended-command)) |
| 228 | 228 | ||
| 229 | (defun te-set-escape-char (c) | 229 | (defun te-set-escape-char (c) |