Re: tramp: plain ftp problem

[Kin Cho]

Hi,

> Michael Albinus <Michael.Albinus@alcatel.de> writes:
> 
> > IIRC, this problem has been fixed already in Emacs CVS some weeks
> > ago. Pls try that ange-ftp.el.
> 
> The HEAD version of the main branch fixed my problem.  Thanks!

The HEAD version (Tue Jun 24 10:46:11 2003) of the main branch of
ange-ftp-generate-root-prefixes seems to have a problem.  It
returns a list instead of a list of lists as expected by
all-completions (called by ange-ftp-file-name-all-completions).

-kin

--- ange-ftp.el-orig    Tue Jun 24 10:46:11 2003
+++ ange-ftp.el Sat Jun 28 09:26:37 2003
@@ -1402,10 +1402,10 @@
         (if (string-match "^[^/]*\\(/\\).*$" key)
             (let ((host (substring key 0 (match-beginning 1)))
                   (user (substring key (match-end 1))))
-              (push (concat user "@" host ":") res))))
+              (push (list (concat user "@" host ":")) res))))
        ange-ftp-passwd-hashtable)
       (maphash
-       (lambda (host user) (push (concat host ":") res))
+       (lambda (host user) (push (list (concat host ":")) res))
        ange-ftp-user-hashtable)
       (or res (list nil)))))