From 48981b8b8111579ee9373e5084209958e224e72a Mon Sep 17 00:00:00 2001 From: Jason Rumney Date: Mon, 30 Mar 2009 13:48:06 +0000 Subject: [PATCH] (locate-dominating-stop-dir-regexp): Stop searching when a UNC mount point is reached. --- lisp/files.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/files.el b/lisp/files.el index 2ab2e88161f..7c792c96c52 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -742,13 +742,14 @@ PATH-AND-SUFFIXES is a pair of lists, (DIRECTORIES . SUFFIXES)." (make-obsolete 'locate-file-completion 'locate-file-completion-table "23.1") (defvar locate-dominating-stop-dir-regexp - "\\`\\(?:[\\/][\\/]\\|/\\(?:net\\|afs\\|\\.\\.\\.\\)/\\)\\'" + "\\`\\(?:[\\/][\\/][^\\/]+\\|/\\(?:net\\|afs\\|\\.\\.\\.\\)/\\)\\'" "Regexp of directory names which stop the search in `locate-dominating-file'. Any directory whose name matches this regexp will be treated like a kind of root directory by `locate-dominating-file' which will stop its search when it bumps into it. The default regexp prevents fruitless and time-consuming attempts to find -special files in directories in which filenames are interpreted as hostnames.") +special files in directories in which filenames are interpreted as hostnames, +or mount points potentially requiring authentication as a different user.") ;; (defun locate-dominating-files (file regexp) ;; "Look up the directory hierarchy from FILE for a file matching REGEXP. -- 2.39.5