summaryrefslogtreecommitdiff
path: root/lisp/emulation
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2009-01-09 05:00:56 +0000
committerGlenn Morris <rgm@gnu.org>2009-01-09 05:00:56 +0000
commit1e4bd40da283e6bbd9f501b7fcbc748353173f41 (patch)
tree023038713fe26febec1d66ff460fe26aea104dc4 /lisp/emulation
parentcfa29281070a1f7868ed42f330d9a666b2fc39e2 (diff)
downloademacs-1e4bd40da283e6bbd9f501b7fcbc748353173f41.tar.gz
Replace last-input-char with last-input-event.
Diffstat (limited to 'lisp/emulation')
-rw-r--r--lisp/emulation/viper-cmd.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emulation/viper-cmd.el b/lisp/emulation/viper-cmd.el
index 95f601716fa..7a793b92d9a 100644
--- a/lisp/emulation/viper-cmd.el
+++ b/lisp/emulation/viper-cmd.el
@@ -2546,7 +2546,7 @@ These keys are ESC, RET, and LineFeed"
(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 @@ These keys are ESC, RET, and LineFeed"
(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)