Commit da205913 authored by Juri Linkov's avatar Juri Linkov
Browse files

* find-dired.el (find-name-arg): Remove autoload. (Bug#4387)

* progmodes/grep.el (rgrep): Require `find-dired' for `find-name-arg'.
parent e2b6892e
2009-11-19 Juri Linkov <juri@jurta.org>
* find-dired.el (find-name-arg): Remove autoload. (Bug#4387)
* progmodes/grep.el (rgrep): Require `find-dired' for `find-name-arg'.
2009-11-19 Chong Yidong <cyd@stupidchicken.com>
* mail/sendmail.el (mail-yank-prefix): Change default to "> ".
......
......@@ -70,7 +70,7 @@ On other systems, the closest you can come is to use `-l'."
:type 'string
:group 'find-dired)
;;;###autoload
;; This used to be autoloaded (see bug#4387).
(defcustom find-name-arg
(purecopy (if read-file-name-completion-ignore-case
"-iname"
......
......@@ -876,7 +876,7 @@ This command shares argument histories with \\[rgrep] and \\[grep]."
(setq default-directory dir))))))
(defvar find-name-arg) ; autoloaded
(defvar find-name-arg) ; not autoloaded but defined in find-dired
;;;###autoload
(defun rgrep (regexp &optional files dir confirm)
......@@ -917,6 +917,7 @@ This command shares argument histories with \\[lgrep] and \\[grep-find]."
(if (not (string= regexp grep-find-command))
(compilation-start regexp 'grep-mode))
(setq dir (file-name-as-directory (expand-file-name dir)))
(require 'find-dired) ; for `find-name-arg'
(let ((command (grep-expand-template
grep-find-template
regexp
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment