diff lisp/locate.el @ 74233:4267b07f90ba

(locate-main-listing-line-p, locate-mode, locate-do-setup): "?\ " -> "?\s".

--- a/lisp/locate.el	Mon Nov 27 13:53:56 2006 +0000
+++ b/lisp/locate.el	Mon Nov 27 13:54:56 2006 +0000
@@ -430,7 +430,7 @@
   (save-excursion
     (forward-line 0)
     (looking-at (concat "."
-			(make-string (1- locate-filename-indentation) ?\ )
+			(make-string (1- locate-filename-indentation) ?\s)
 			"\\(/\\|[A-Za-z]:\\)"))))
 
 (defun locate-mouse-view-file (event)
@@ -478,7 +478,7 @@
   ;; This should support both Unix and Windoze style names
   (setq directory-listing-before-filename-regexp
 	(concat "^."
-		(make-string (1- locate-filename-indentation) ?\ )
+		(make-string (1- locate-filename-indentation) ?\s)
 		"\\(/\\|[A-Za-z]:\\)\\|"
 		(default-value 'directory-listing-before-filename-regexp)))
   (make-local-variable 'dired-actual-switches)
@@ -486,7 +486,7 @@
   (make-local-variable 'dired-permission-flags-regexp)
   (setq dired-permission-flags-regexp
 	(concat "^.\\("
-		(make-string (1- locate-filename-indentation) ?\ )
+		(make-string (1- locate-filename-indentation) ?\s)
 		"\\)\\|"
 		(default-value 'dired-permission-flags-regexp)))
   (make-local-variable 'revert-buffer-function)
@@ -511,7 +511,7 @@
     (locate-insert-header search-string)
 
     (while (not (eobp))
-      (insert-char ?\  locate-filename-indentation t)
+      (insert-char ?\s locate-filename-indentation t)
       (locate-set-properties)
       (forward-line 1)))
   (goto-char (point-min)))