# HG changeset patch # User Jason Rumney # Date 1238420886 0 # Node ID b7fa7db181be2ed18761d62134fd72f3a89cbae8 # Parent 159a238ef4ba4b7cc3bb0082662fdf0f99fa80ef (locate-dominating-stop-dir-regexp): Stop searching when a UNC mount point is reached. diff -r 159a238ef4ba -r b7fa7db181be lisp/files.el --- a/lisp/files.el Mon Mar 30 12:51:11 2009 +0000 +++ b/lisp/files.el Mon Mar 30 13:48:06 2009 +0000 @@ -742,13 +742,14 @@ (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.