From: Michael Albinus <michael.albinus@gmx.de>
Date: Mon, 29 Sep 2008 05:39:39 +0000 (+0000)
Subject: * files.el (file-remote-p): Precise doc string; IDENTIFICATION can
X-Git-Tag: emacs-pretest-23.0.90~2731
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9f2f6ad816ec17abe8aa47cc7c31e665f1931d6a;p=emacs.git

* files.el (file-remote-p): Precise doc string; IDENTIFICATION can
also be `localname'.
---

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.
 
 IDENTIFICATION specifies which part of the identification shall
 be returned as string.  IDENTIFICATION can be the symbol
-`method', `user' or `host'; any other value is handled like nil
-and means to return the complete identification string.
+`method', `user', `host' or `localname'; any other value is
+handled like nil and means to return the complete identification
+string.
 
 If CONNECTED is non-nil, the function returns an identification only
 if 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
     ;; Avoid treating /home/foo as /home/Foo during `~' substitution.
     ;; To fix this right, we need a `file-name-case-sensitive-p'
     ;; function, but we don't have that yet, so just guess.
-    (let ((case-fold-search 
+    (let ((case-fold-search
 	   (memq system-type '(ms-dos windows-nt darwin cygwin))))
       ;; If any elt of directory-abbrev-alist matches this name,
       ;; abbreviate accordingly.