diff options
| author | Richard M. Stallman <rms@gnu.org> | 2005-01-17 23:51:34 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2005-01-17 23:51:34 +0000 |
| commit | 52a7f9bd2a3c656cccc022913192de65c85e8b23 (patch) | |
| tree | ca5136780e65173fb574714715d7abc749409c09 | |
| parent | b64e46503fdc4dc3e5a8613660a5c71b1bb1eaaa (diff) | |
| download | emacs-52a7f9bd2a3c656cccc022913192de65c85e8b23.tar.gz emacs-52a7f9bd2a3c656cccc022913192de65c85e8b23.tar.bz2 emacs-52a7f9bd2a3c656cccc022913192de65c85e8b23.zip | |
(grep-find): Copy from `grep' the condition for calling grep-compute-defaults.
| -rw-r--r-- | lisp/progmodes/grep.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el index 04fcae78ea6..8efa48aaa48 100644 --- a/lisp/progmodes/grep.el +++ b/lisp/progmodes/grep.el @@ -527,7 +527,8 @@ This command uses a special history list for its arguments, so you can easily repeat a find command." (interactive (progn - (unless grep-find-command + (unless (and grep-command + (or (not grep-use-null-device) (eq grep-use-null-device t))) (grep-compute-defaults)) (if grep-find-command (list (read-from-minibuffer "Run find (like this): " |