Mercurial > emacs

diff lisp/emulation/viper-cmd.el @ 101013:dbe70c3aa01d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Replace last-input-char with last-input-event.
author Glenn Morris <rgm@gnu.org>
date Fri, 09 Jan 2009 05:00:56 +0000
parents ad9d2270860e
children affb617d6101
line wrap: on
line diff
--- a/lisp/emulation/viper-cmd.el	Fri Jan 09 04:57:03 2009 +0000
+++ b/lisp/emulation/viper-cmd.el	Fri Jan 09 05:00:56 2009 +0000
@@ -2546,7 +2546,7 @@
   (let (com)
     (if (eq this-command 'viper-intercept-ESC-key)
 	(setq com 'viper-exit-insert-state)
-      (viper-set-unread-command-events last-input-char)
+      (viper-set-unread-command-events last-input-event)
       (setq com (key-binding (viper-read-key-sequence nil))))
 
     (condition-case conds
@@ -2567,7 +2567,7 @@
   (if (or (< (point) (viper-replace-start))
 	  (> (point) (viper-replace-end)))
       (let (viper-replace-minor-mode com)
-	(viper-set-unread-command-events last-input-char)
+	(viper-set-unread-command-events last-input-event)
 	(setq com (key-binding (read-key-sequence nil)))
 	(condition-case conds
 	    (command-execute com)