aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2005-01-17 23:51:34 +0000
committerRichard M. Stallman2005-01-17 23:51:34 +0000
commit52a7f9bd2a3c656cccc022913192de65c85e8b23 (patch)
treeca5136780e65173fb574714715d7abc749409c09
parentb64e46503fdc4dc3e5a8613660a5c71b1bb1eaaa (diff)
downloademacs-52a7f9bd2a3c656cccc022913192de65c85e8b23.tar.gz
emacs-52a7f9bd2a3c656cccc022913192de65c85e8b23.zip
(grep-find): Copy from `grep' the condition for calling grep-compute-defaults.
-rw-r--r--lisp/progmodes/grep.el3
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
527easily repeat a find command." 527easily repeat a find command."
528 (interactive 528 (interactive
529 (progn 529 (progn
530 (unless grep-find-command 530 (unless (and grep-command
531 (or (not grep-use-null-device) (eq grep-use-null-device t)))
531 (grep-compute-defaults)) 532 (grep-compute-defaults))
532 (if grep-find-command 533 (if grep-find-command
533 (list (read-from-minibuffer "Run find (like this): " 534 (list (read-from-minibuffer "Run find (like this): "