summaryrefslogtreecommitdiff
path: root/lisp/replace.el
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/replace.el
parentcfa29281070a1f7868ed42f330d9a666b2fc39e2 (diff)
downloademacs-1e4bd40da283e6bbd9f501b7fcbc748353173f41.tar.gz
Replace last-input-char with last-input-event.
Diffstat (limited to 'lisp/replace.el')
-rw-r--r--lisp/replace.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/replace.el b/lisp/replace.el
index 95bb680b7a4..131bfb66f77 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -1,7 +1,8 @@
;;; replace.el --- replace commands for Emacs
;; Copyright (C) 1985, 1986, 1987, 1992, 1994, 1996, 1997, 2000, 2001,
-;; 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
+;; Free Software Foundation, Inc.
;; Maintainer: FSF
@@ -1571,7 +1572,7 @@ make, or the user didn't cancel the call."
;; If last typed key in previous call of multi-buffer perform-replace
;; was `automatic-all', don't ask more questions in next files
- (when (eq (lookup-key map (vector last-input-char)) 'automatic-all)
+ (when (eq (lookup-key map (vector last-input-event)) 'automatic-all)
(setq query-flag nil multi-buffer t))
;; REPLACEMENTS is either a string, a list of strings, or a cons cell