[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/net/ange-ftp.el [emacs-unicode-2]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/net/ange-ftp.el [emacs-unicode-2] |
Date: |
Tue, 29 Jun 2004 13:25:11 -0400 |
Index: emacs/lisp/net/ange-ftp.el
diff -c emacs/lisp/net/ange-ftp.el:1.50.2.2 emacs/lisp/net/ange-ftp.el:1.50.2.3
*** emacs/lisp/net/ange-ftp.el:1.50.2.2 Mon Jun 28 07:29:48 2004
--- emacs/lisp/net/ange-ftp.el Tue Jun 29 16:45:23 2004
***************
*** 4117,4123 ****
tmp1))))
(defun ange-ftp-file-remote-p (file)
! (when (ange-ftp-ftp-name file) t))
(defun ange-ftp-load (file &optional noerror nomessage nosuffix)
(if (ange-ftp-ftp-name file)
--- 4117,4123 ----
tmp1))))
(defun ange-ftp-file-remote-p (file)
! (ange-ftp-replace-name-component file ""))
(defun ange-ftp-load (file &optional noerror nomessage nosuffix)
(if (ange-ftp-ftp-name file)