# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1177077481 0
# Node ID dfae3f6e5202e197c9329b9549e198990c8f66e9
# Parent  3a49c84492d78adc340f5ed5ae1b0bf69272ffcd
(locate): Output from shell-command should go in the current buffer
rather than *Shell Command Output*.

diff -r 3a49c84492d7 -r dfae3f6e5202 lisp/locate.el
--- a/lisp/locate.el	Fri Apr 20 13:57:53 2007 +0000
+++ b/lisp/locate.el	Fri Apr 20 13:58:01 2007 +0000
@@ -310,7 +310,7 @@
         (set (make-local-variable 'locate-current-filter) filter)
 
         (if run-locate-command
-            (shell-command search-string)
+            (shell-command search-string (current-buffer))
           (apply 'call-process locate-cmd nil t nil locate-cmd-args))
 
         (and filter