(locate): Remove dot at the end of error argument.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7a46f4ea29285aaeedb9670febc0072802827725..1697f1a200d1e5ccc98c7e34f35c5e237e7fdb68 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2001-12-25  Pavel Jan\e,Bm\e(Bk  <Pavel@Janik.cz>
 
+       * locate.el (locate): Remove dot at the end of error argument.
+
        * emerge.el (emerge-show-file-name): Use frame-height instead of
        obsolete screen-height.
 

diff --git a/lisp/locate.el b/lisp/locate.el
index 12eb08a032653b88cca5c72ae6a6b2828d2a99f8..c467665a8e584e18802a6471c133463f189af6b4 100644 (file)
--- a/lisp/locate.el
+++ b/lisp/locate.el
@@ -210,7 +210,7 @@ With prefix arg, prompt for the locate command to run."
                    (setq input default))
               input))))
   (if (equal search-string "")
-      (error "Please specify a filename to search for."))
+      (error "Please specify a filename to search for"))
   (let* ((locate-cmd-list (funcall locate-make-command-line search-string))
         (locate-cmd (car locate-cmd-list))
         (locate-cmd-args (cdr locate-cmd-list))