[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100151: * lisp/locate.el (locate, locate-mode): Doc fixes.

[Glenn Morris]

------------------------------------------------------------
revno: 100151
committer: Glenn Morris <address@hidden>
branch nick: emacs-23
timestamp: Sun 2010-10-31 23:55:49 -0700
message:
  * lisp/locate.el (locate, locate-mode): Doc fixes.
modified:
  lisp/ChangeLog
  lisp/locate.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-11-01 03:35:06 +0000
+++ b/lisp/ChangeLog    2010-11-01 06:55:49 +0000
@@ -1,3 +1,7 @@
+2010-11-01  Glenn Morris  <address@hidden>
+
+       * locate.el (locate, locate-mode): Doc fixes.
+
 2010-11-01  Chong Yidong  <address@hidden>
 
        * server.el (server-start): New arg INHIBIT-PROMPT prevents asking

=== modified file 'lisp/locate.el'
--- a/lisp/locate.el    2010-01-13 08:35:10 +0000
+++ b/lisp/locate.el    2010-11-01 06:55:49 +0000
@@ -270,7 +270,7 @@
 (defun locate (search-string &optional filter arg)
   "Run the program `locate', putting results in `*Locate*' buffer.
 Pass it SEARCH-STRING as argument.  Interactively, prompt for SEARCH-STRING.
-With prefix arg, prompt for the exact shell command to run instead.
+With prefix arg ARG, prompt for the exact shell command to run instead.
 
 This program searches for those file names in a database that match
 SEARCH-STRING and normally outputs all matching absolute file names,
@@ -286,7 +286,8 @@
 The main use of FILTER is to implement `locate-with-filter'.  See
 the docstring of that function for its meaning.
 
-ARG is the interactive prefix arg."
+After preparing the results buffer, this runs `dired-mode-hook' and
+then `locate-post-command-hook'."
   (interactive
    (list
     (locate-prompt-for-search-string)
@@ -300,8 +301,7 @@
         (locate-cmd-args (cdr locate-cmd-list))
         (run-locate-command
          (or (and arg (not locate-prompt-for-command))
-             (and (not arg) locate-prompt-for-command)))
-        )
+             (and (not arg) locate-prompt-for-command))))
 
     ;; Find the Locate buffer
     (save-window-excursion
@@ -323,16 +323,13 @@
        (and filter
             (locate-filter-output filter))
 
-       (locate-do-setup search-string)
-       ))
+       (locate-do-setup search-string)))
     (and (not (string-equal (buffer-name) locate-buffer-name))
        (switch-to-buffer-other-window locate-buffer-name))
 
     (run-hooks 'dired-mode-hook)
     (dired-next-line 3)                        ;move to first matching file.
-    (run-hooks 'locate-post-command-hook)
-    )
-  )
+    (run-hooks 'locate-post-command-hook)))
 
 ;;;###autoload
 (defun locate-with-filter (search-string filter &optional arg)
@@ -447,6 +444,7 @@
 \\<locate-mode-map>\
 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.
+This function runs `locate-mode-hook' before returning.
 
 Operating on listed files works, but does not always
 automatically update the buffer as in ordinary Dired.
@@ -687,5 +685,4 @@
 
 (provide 'locate)
 
-;; arch-tag: 60c4d098-b5d5-4b3c-a3e0-51a2e9f43898
 ;;; locate.el ends here