diff lisp/term.el @ 101013:dbe70c3aa01d

Replace last-input-char with last-input-event.
author Glenn Morris <rgm@gnu.org>
date Fri, 09 Jan 2009 05:00:56 +0000
parents a9dc0e7c3f2b
children b34b0237ca1a
line wrap: on
line diff
--- a/lisp/term.el	Fri Jan 09 04:57:03 2009 +0000
+++ b/lisp/term.el	Fri Jan 09 05:00:56 2009 +0000
@@ -1182,15 +1182,15 @@
 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