(choose-completion-string): Use `minibufferp';

[gnu-emacs] / lisp / locate.el

diff --git a/lisp/locate.el b/lisp/locate.el
index c467665a8e584e18802a6471c133463f189af6b4..40e8ddc65c38560fc34d0ecd91a717907472fc31 100644 (file)
--- a/lisp/locate.el
+++ b/lisp/locate.el
@@ -200,7 +200,7 @@ With prefix arg, prompt for the locate command to run."
                       (+ 2 (length (car locate-cmd))))
              nil nil 'locate-history-list))
         (let* ((default (locate-word-at-point))
-              (input 
+              (input
                (read-from-minibuffer
                 (if  (> (length default) 0)
                     (format "Locate (default `%s'): " default)