diff options
author | Jason Rumney <[email protected]> | 2009-03-30 13:48:06 +0000 |
---|---|---|
committer | Jason Rumney <[email protected]> | 2009-03-30 13:48:06 +0000 |
commit | 48981b8b8111579ee9373e5084209958e224e72a (patch) | |
tree | 9c93d27d3c8de02d65781efad7d3a7a5d4e3387c | |
parent | d8d2f142e0c318c69e9dbc08af4881d861b07d5a (diff) |
(locate-dominating-stop-dir-regexp): Stop searching
when a UNC mount point is reached.
-rw-r--r-- | lisp/files.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/files.el b/lisp/files.el index 2ab2e88161..7c792c96c5 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. |