From 1e4bd40da283e6bbd9f501b7fcbc748353173f41 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 9 Jan 2009 05:00:56 +0000 Subject: Replace last-input-char with last-input-event. --- lisp/term.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'lisp/term.el') diff --git a/lisp/term.el b/lisp/term.el index 56d7fb24d06..14884246c6c 100644 --- a/lisp/term.el +++ b/lisp/term.el @@ -1182,15 +1182,15 @@ Entry to this mode runs the hooks on `term-mode-hook'." without any interpretation." (interactive) ;; Convert `return' to C-m, etc. - (when (and (symbolp last-input-char) - (get last-input-char 'ascii-character)) - (setq last-input-char (get last-input-char 'ascii-character))) - (term-send-raw-string (make-string 1 last-input-char))) + (when (and (symbolp last-input-event) + (get last-input-event 'ascii-character)) + (setq last-input-event (get last-input-event 'ascii-character))) + (term-send-raw-string (make-string 1 last-input-event))) (defun term-send-raw-meta () (interactive) - (let ((char last-input-char)) - (when (symbolp last-input-char) + (let ((char last-input-event)) + (when (symbolp last-input-event) ;; Convert `return' to C-m, etc. (let ((tmp (get char 'event-symbol-elements))) (when tmp -- cgit v1.2.3