[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

ange-ftp bug

From: Katsumi Yamaoka
Subject: ange-ftp bug
Date: Fri, 23 Jan 2004 21:59:28 +0900
User-agent: Gnus/5.110002 (No Gnus v0.2) Emacs/21.3.50 (gnu/linux)


I am being troubled with some problems concerned to tramp-ftp.el
and ange-ftp.el.  Let me report the solutions for two of those

One has been posted to the Tramp list.  When I performed the `f'
command in order to open a file in the dired buffer for the
directory /ftp:address@hidden:/somewhere/, it attempts to
connect to the remotehost as an anonymous user.  It is because
the default value for the ange-ftp-name-format variable is not
suitable to Tramp file names.  Here's a test case:

(ange-ftp-ftp-name "/ftp:address@hidden:/somewhere/file")
 => ("ftp" "anonymous" "address@hidden:/somewhere/file")

I've modified that value as follows:

(setq ange-ftp-name-format
        2 1 3))

Shouldn't it be the new default value in ange-ftp.el?

Another problem is caused by performing chroot in the remotehost.
It also occurs if the pathname of the home directories are
different between the localhost and the remotehost.  When I
perform dired to /ftp:address@hidden:~/, Emacs accesses
/ftp:address@hidden:(The name of the local home directory).
It can be verified even with anonymous ftp sites:

(dired "/

My solution for the problem is below:

*** ange-ftp.el~        Mon Jan  5 13:58:18 2004
--- ange-ftp.el Fri Jan 23 12:55:58 2004
*** 3095,3101 ****
                        (dir (ange-ftp-expand-dir host user tilda)))
                   (if dir
                       (setq name (if (string-equal dir "/")
!                                     rest (concat dir rest)))
                     (error "User \"%s\" is not known"
                            (substring tilda 1)))))
--- 3095,3104 ----
                        (dir (ange-ftp-expand-dir host user tilda)))
                   (if dir
                       (setq name (if (string-equal dir "/")
!                                     (if (string-equal rest "")
!                                         dir
!                                       rest)
!                                   (concat dir rest)))
                     (error "User \"%s\" is not known"
                            (substring tilda 1)))))
Katsumi Yamaoka <address@hidden>

reply via email to

[Prev in Thread] Current Thread [Next in Thread]