160 |
:group 'locate) |
:group 'locate) |
161 |
|
|
162 |
(defcustom locate-prompt-for-command nil |
(defcustom locate-prompt-for-command nil |
163 |
"If non-nil, the default behavior of the locate command is to prompt for a command to run. |
"If non-nil, the locate command prompts for a command to run. |
164 |
Otherwise, that behavior is invoked via a prefix argument." |
Otherwise, that behavior is invoked via a prefix argument." |
165 |
:group 'locate |
:group 'locate |
166 |
:type 'boolean |
:type 'boolean |
329 |
;; Default directory is set to "/" so that dired commands, which |
;; Default directory is set to "/" so that dired commands, which |
330 |
;; expect to be in a tree, will work properly |
;; expect to be in a tree, will work properly |
331 |
(defun locate-mode () |
(defun locate-mode () |
332 |
"Major mode for the `*Locate*' buffer made by \\[locate]." |
"Major mode for the `*Locate*' buffer made by \\[locate]. |
333 |
|
In that buffer, you can use almost all the usual dired bindings. |
334 |
|
\\[locate-find-directory] visits the directory of the file on the current line. |
335 |
|
|
336 |
|
\\{locate-mode-map}" |
337 |
(kill-all-local-variables) |
(kill-all-local-variables) |
338 |
;; Avoid clobbering this variables |
;; Avoid clobbering this variables |
339 |
(make-local-variable 'dired-subdir-alist) |
(make-local-variable 'dired-subdir-alist) |