Mercurial > emacs
changeset 65790:2eea5cbe306f
(ange-ftp-insert-directory): Undo unintended part in last change.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Sun, 02 Oct 2005 15:38:20 +0000 |
parents | 342bbdcdefeb |
children | 5121212db622 |
files | lisp/ChangeLog lisp/net/ange-ftp.el |
diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Oct 02 15:01:48 2005 +0000 +++ b/lisp/ChangeLog Sun Oct 02 15:38:20 2005 +0000 @@ -1,3 +1,8 @@ +2005-10-02 Stefan Monnier <monnier@iro.umontreal.ca> + + * net/ange-ftp.el (ange-ftp-insert-directory): Undo unintended part + in last change. + 2005-10-02 Romain Francoise <romain@orebokech.com> * progmodes/compile.el (compile-goto-error): Delete extra paren.
--- a/lisp/net/ange-ftp.el Sun Oct 02 15:01:48 2005 +0000 +++ b/lisp/net/ange-ftp.el Sun Oct 02 15:38:20 2005 +0000 @@ -4484,7 +4484,7 @@ ;; Follow symlinks. (let (tem) (while (and (not wildcard) - (stringp (setq tem (ange-ftp-get-file-entry + (stringp (setq tem (file-symlink-p (directory-file-name file))))) (setq file (ange-ftp-expand-symlink