summaryrefslogtreecommitdiff
path: root/lisp/progmodes/grep.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/progmodes/grep.el')
-rw-r--r--lisp/progmodes/grep.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el
index 04fcae78ea6..a3b1ab3abdd 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): "
@@ -541,6 +542,9 @@ easily repeat a find command."
(let ((null-device nil)) ; see grep
(grep command-args))))
+;;;###autoload
+(defalias 'find-grep 'grep-find)
+
(defun grep-expand-command-macros (command &optional regexp files dir excl case-fold)
"Patch grep COMMAND replacing <D>, etc."
(setq command