diff --git a/lisp/terminal.el b/lisp/terminal.el index 35d5022aaf6..c1f30dda707 100644 --- a/lisp/terminal.el +++ b/lisp/terminal.el @@ -223,7 +223,7 @@ Other chars following \"%s\" are interpreted as follows:\n" ;; not used. (defun te-escape-extended-command-unread () (interactive) - (setq unread-command-char last-input-char) + (setq unread-command-event last-input-char) (te-escape-extended-command)) (defun te-set-escape-char (c)