[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/files.el,v
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/files.el,v |
Date: |
Tue, 17 Jul 2007 21:07:50 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Michael Albinus <albinus> 07/07/17 21:07:50
Index: files.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/files.el,v
retrieving revision 1.911
retrieving revision 1.912
diff -u -b -r1.911 -r1.912
--- files.el 10 Jul 2007 02:02:31 -0000 1.911
+++ files.el 17 Jul 2007 21:07:49 -0000 1.912
@@ -727,7 +727,7 @@
(cons load-path (get-load-suffixes)))))
(load library))
-(defun file-remote-p (file &optional connected)
+(defun file-remote-p (file &optional identification connected)
"Test whether FILE specifies a location on a remote system.
Return an identification of the system if the location is indeed
remote. The identification of the system may comprise a method
@@ -736,6 +736,11 @@
For example, the filename \"/address@hidden:/foo\" specifies a location
on the system \"/address@hidden:\".
+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.
+
If CONNECTED is non-nil, the function returns an identification only
if FILE is located on a remote system, and a connection is established
to that remote system.
@@ -743,7 +748,7 @@
`file-remote-p' will never open a connection on its own."
(let ((handler (find-file-name-handler file 'file-remote-p)))
(if handler
- (funcall handler 'file-remote-p file connected)
+ (funcall handler 'file-remote-p file identification connected)
nil)))
(defun file-local-copy (file)
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Richard M. Stallman, 2007/07/02
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Richard M. Stallman, 2007/07/02
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Stefan Monnier, 2007/07/07
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Michael Albinus, 2007/07/08
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Miles Bader, 2007/07/09
- [Emacs-diffs] Changes to emacs/lisp/files.el,v,
Michael Albinus <=
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Stefan Monnier, 2007/07/18
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Stefan Monnier, 2007/07/20
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Nick Roberts, 2007/07/22
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Miles Bader, 2007/07/26