From: Gerd Moellmann <gerd@gnu.org>
Date: Fri, 7 Sep 2001 13:33:09 +0000 (+0000)
Subject: (locate-insert-header): Remove unnecessary
X-Git-Tag: emacs-pretest-21.0.106~199
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5421b8996bf223651b97448865b63764cd7fe9c4;p=emacs.git

(locate-insert-header): Remove unnecessary
whitespaces.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 239dd228879..206f0c23bcd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,11 @@
 	* comint.el (comint-send-input): Handle comint-process-echoes
 	differently.
 
+2001-09-07  Pavel Jan,Bm(Bk  <Pavel@Janik.cz>
+
+	* locate.el (locate-insert-header): Remove unnecessary
+	whitespace.
+
 2001-09-07  Eli Zaretskii  <eliz@is.elta.co.il>
 
 	* arc-mode.el (archive-dostime): Fix a typo in minutes'
diff --git a/lisp/locate.el b/lisp/locate.el
index ceb29458864..80dc7af7a21 100644
--- a/lisp/locate.el
+++ b/lisp/locate.el
@@ -1,6 +1,6 @@
 ;;; locate.el --- interface to the locate command
 
-;; Copyright (C) 1996, 1998 Free Software Foundation, Inc.
+;; Copyright (C) 1996, 1998, 2001 Free Software Foundation, Inc.
 
 ;; Author: Peter Breton <pbreton@cs.umb.edu>
 ;; Keywords: unix files
@@ -404,9 +404,9 @@ shown; this is often useful to constrain a big search."
 	      (append (list locate-current-filter) locate-format-args)))
 
     (setq locate-format-string
-	  (concat locate-format-string ": \n\n")
+	  (concat locate-format-string ":\n\n")
 	  locate-regexp-match
-	  (concat locate-regexp-match ": \n"))
+	  (concat locate-regexp-match ":\n"))
 
     (insert (apply 'format locate-format-string (reverse locate-format-args)))