diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2005-10-23 12:17:28 +0000 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2005-10-23 12:17:28 +0000 |
commit | 9bc260cfb76b5bbe39a3edf1b3933e4be11de759 (patch) | |
tree | 9a401462217efe6afa01833aa18141d59a59e2ba /lisp/locate.el | |
parent | 9f40e1d51e7d555119d5e6de61c27bf7c9e4706e (diff) | |
download | emacs-9bc260cfb76b5bbe39a3edf1b3933e4be11de759.tar.gz |
* files.el (directory-listing-before-filename-regexp): New
defvar. Replaces `dired-move-to-filename-regexp' from dired.el.
* dired.el (dired-move-to-filename-regexp): Removed. All
occurences replaced by `directory-listing-before-filename-regexp'.
* dired-x.el, locate.el, vc.el: Replace
`dired-move-to-filename-regexp' by
`directory-listing-before-filename-regexp'. In vc.el it is
overwritten locally; maybe this can be handled in files.el too.
* net/ange-ftp.el (ange-ftp-date-regexp): Removed. All occurences
replaced by `directory-listing-before-filename-regexp'.
* faq.texi (Bugs and problems): Replace
`dired-move-to-filename-regexp' by
`directory-listing-before-filename-regexp'.
Diffstat (limited to 'lisp/locate.el')
-rw-r--r-- | lisp/locate.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/locate.el b/lisp/locate.el index 390e0ec72b3..5b61ed522e9 100644 --- a/lisp/locate.el +++ b/lisp/locate.el @@ -376,13 +376,13 @@ do not work in subdirectories. (set (make-local-variable 'dired-directory) "/") (set (make-local-variable 'dired-subdir-switches) locate-ls-subdir-switches) (setq dired-switches-alist nil) - (make-local-variable 'dired-move-to-filename-regexp) + (make-local-variable 'directory-listing-before-filename-regexp) ;; This should support both Unix and Windoze style names - (setq dired-move-to-filename-regexp + (setq directory-listing-before-filename-regexp (concat "^." (make-string (1- locate-filename-indentation) ?\ ) "\\(/\\|[A-Za-z]:\\)\\|" - (default-value 'dired-move-to-filename-regexp))) + (default-value 'directory-listing-before-filename-regexp))) (make-local-variable 'dired-actual-switches) (setq dired-actual-switches "") (make-local-variable 'dired-permission-flags-regexp) |