Michael Albinus <[EMAIL PROTECTED]> writes: > Could you, please, check whether you run the ange-ftp from Emacs CVS? > > And could you, please, evaluate (file-attributes "/[EMAIL PROTECTED]:/pub") > This works for me without problems.
I've decided I'd been bitten often enough by this particular problem started with the advent of hashtable use in ange-ftp. I am checking in the following patch now:
--- ange-ftp.el 26 Jun 2004 20:44:23 +0200 1.58 +++ ange-ftp.el 21 Aug 2004 19:35:59 +0200 @@ -1014,7 +1014,7 @@ (defun ange-ftp-hash-entry-exists-p (key tbl) "Return whether there is an association for KEY in TABLE." - (not (eq (gethash key tbl 'unknown) 'unknown))) + (and tbl (not (eq (gethash key tbl 'unknown) 'unknown)))) (defun ange-ftp-hash-table-keys (tbl) "Return a sorted list of all the active keys in TABLE, as strings." @@ -2919,11 +2919,8 @@ ;; error message. (gethash "." ent)) ;; Child lookup failed, so try the parent. - (let ((table (ange-ftp-get-files dir 'no-error))) - ;; If the dir doesn't exist, don't use it as a hash table. - (and table - (ange-ftp-hash-entry-exists-p file - table))))))) + (ange-ftp-hash-entry-exists-p + file (ange-ftp-get-files dir 'no-error)))))) (defun ange-ftp-get-file-entry (name) "Given NAME, return the given file entry.
-- David Kastrup, Kriemhildstr. 15, 44793 Bochum
_______________________________________________ Tramp-devel mailing list [EMAIL PROTECTED] http://lists.nongnu.org/mailman/listinfo/tramp-devel
