diff lisp/replace.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 7f8b299098d7
line wrap: on
line diff
--- a/lisp/replace.el	Fri Jan 09 04:57:03 2009 +0000
+++ b/lisp/replace.el	Fri Jan 09 05:00:56 2009 +0000
@@ -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 @@
 
     ;; 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