Re: ange-ftp appears to have trouble with symbolic links to directories

[Andrew Koenig <ark@research.att.com>]

Stefan> Wait, I think the patch below was the meat of it, can you try it ?

Doesn't seem to help.  The relevant code now looks like this:

(defun ange-ftp-insert-directory (file switches &optional wildcard full)
  (save-match-data
    (let ((short (ange-ftp-abbreviate-filename file))
	  (parsed (ange-ftp-ftp-name (expand-file-name file)))
	  tem)
      (if parsed
	  (if (and (not wildcard)
		   (setq tem (file-symlink-p (directory-file-name file))))
	      (ange-ftp-insert-directory
	       (ange-ftp-expand-symlink
		tem (file-name-directory (directory-file-name file)))
	       switches wildcard full)
	    (insert
	     (if wildcard
		 (let ((default-directory (file-name-directory file)))
		   (ange-ftp-ls (file-name-nondirectory file)
				switches nil nil t))
	       (ange-ftp-ls file switches full))))
	       (ange-ftp-real-insert-directory file switches wildcard full)))))

-- 
Andrew Koenig, ark@research.att.com, http://www.research.att.com/info/ark