diff options
author | Glenn Morris <rgm@gnu.org> | 2009-01-09 05:00:56 +0000 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2009-01-09 05:00:56 +0000 |
commit | 1e4bd40da283e6bbd9f501b7fcbc748353173f41 (patch) | |
tree | 023038713fe26febec1d66ff460fe26aea104dc4 /lisp/replace.el | |
parent | cfa29281070a1f7868ed42f330d9a666b2fc39e2 (diff) | |
download | emacs-1e4bd40da283e6bbd9f501b7fcbc748353173f41.tar.gz |
Replace last-input-char with last-input-event.
Diffstat (limited to 'lisp/replace.el')
-rw-r--r-- | lisp/replace.el | 5 |
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 |