Mercurial > emacs

changeset 74233:4267b07f90ba

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(locate-main-listing-line-p, locate-mode, locate-do-setup): "?\ " -> "?\s".
author Juanma Barranquero <lekktu@gmail.com>
date Mon, 27 Nov 2006 13:54:56 +0000
parents 4accd8d9cc3c
children d966c458c782
files lisp/locate.el
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- 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)))