aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorMichael Albinus2008-09-29 05:39:39 +0000
committerMichael Albinus2008-09-29 05:39:39 +0000
commit9f2f6ad816ec17abe8aa47cc7c31e665f1931d6a (patch)
tree4e261cddf5a3b94b9bb12f37194a3b0fc382ce92 /lisp
parent10d5dd8ca5cfb9ab60aadcc74374c11444d8c770 (diff)
downloademacs-9f2f6ad816ec17abe8aa47cc7c31e665f1931d6a.tar.gz
emacs-9f2f6ad816ec17abe8aa47cc7c31e665f1931d6a.zip
* files.el (file-remote-p): Precise doc string; IDENTIFICATION can
also be `localname'.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/files.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/files.el b/lisp/files.el
index 03a3a03cbb2..0abe462316e 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -771,8 +771,9 @@ Furthermore, relative file names do not work across remote connections.
771 771
772IDENTIFICATION specifies which part of the identification shall 772IDENTIFICATION specifies which part of the identification shall
773be returned as string. IDENTIFICATION can be the symbol 773be returned as string. IDENTIFICATION can be the symbol
774`method', `user' or `host'; any other value is handled like nil 774`method', `user', `host' or `localname'; any other value is
775and means to return the complete identification string. 775handled like nil and means to return the complete identification
776string.
776 777
777If CONNECTED is non-nil, the function returns an identification only 778If CONNECTED is non-nil, the function returns an identification only
778if FILE is located on a remote system, and a connection is established 779if FILE is located on a remote system, and a connection is established
@@ -1416,7 +1417,7 @@ home directory is a root directory) and removes automounter prefixes
1416 ;; Avoid treating /home/foo as /home/Foo during `~' substitution. 1417 ;; Avoid treating /home/foo as /home/Foo during `~' substitution.
1417 ;; To fix this right, we need a `file-name-case-sensitive-p' 1418 ;; To fix this right, we need a `file-name-case-sensitive-p'
1418 ;; function, but we don't have that yet, so just guess. 1419 ;; function, but we don't have that yet, so just guess.
1419 (let ((case-fold-search 1420 (let ((case-fold-search
1420 (memq system-type '(ms-dos windows-nt darwin cygwin)))) 1421 (memq system-type '(ms-dos windows-nt darwin cygwin))))
1421 ;; If any elt of directory-abbrev-alist matches this name, 1422 ;; If any elt of directory-abbrev-alist matches this name,
1422 ;; abbreviate accordingly. 1423 ;; abbreviate accordingly.