(locate-prompt-for-command): Shorten first line of docstring.

(locate-mode): Expand docstring and include keymap summary.

2 files changed, 12 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 00e75ded5ec..ef439eb1bfc 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,11 @@
 2004-05-20  Luc Teirlinck  <teirllm@auburn.edu>
 
+        * locate.el (locate-prompt-for-command): Shorten first line of
+        docstring.
+        (locate-mode): Expand docstring and include keymap summary.
+
+2004-05-20  Luc Teirlinck  <teirllm@auburn.edu>
+
         * files.el (find-file-noselect-1): Limit the scope of the
         `inhibit-read-only' binding.  Make sure that `inhibit-read-only'
         is, by default, nil during the execution of
diff --git a/lisp/locate.el b/lisp/locate.el
index eb8074c9f6c..e61ec87d4e4 100644
--- a/lisp/locate.el
+++ b/lisp/locate.el
@@ -160,7 +160,7 @@
   :group 'locate)
 
 (defcustom locate-prompt-for-command nil
-  "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.
 Otherwise, that behavior is invoked via a prefix argument."
   :group 'locate
   :type 'boolean
@@ -329,7 +329,11 @@ shown; this is often useful to constrain a big search."
 ;; Default directory is set to "/" so that dired commands, which
 ;; expect to be in a tree, will work properly
 (defun locate-mode ()
-  "Major mode for the `*Locate*' buffer made by \\[locate]."
+  "Major mode for the `*Locate*' buffer made by \\[locate].
+In that buffer, you can use almost all the usual dired bindings.
+\\[locate-find-directory] visits the directory of the file on the current line.
+
+\\{locate-mode-map}"
   (kill-all-local-variables)
   ;; Avoid clobbering this variables
   (make-local-variable 'dired-subdir-alist)