From a861d465fd46bf649023419e49d8186a9658282a Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 27 Nov 2006 13:54:56 +0000 Subject: [PATCH] (locate-main-listing-line-p, locate-mode, locate-do-setup): "?\ " -> "?\s". --- lisp/locate.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/locate.el b/lisp/locate.el index 9cf37e89ee1..bb3108210ed 100644 --- a/lisp/locate.el +++ b/lisp/locate.el @@ -430,7 +430,7 @@ file name or is inside a subdirectory." (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 @@ do not work in subdirectories. ;; 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 @@ do not work in subdirectories. (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 @@ do not work in subdirectories. (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))) -- 2.39.2