| Subject: | Handle symbolic links to directories |
All symbolic links are currently treated as files. This patch will correctly handle a symbolic link to a directory.
--- RemoteFileSelect.pm.old2 Fri Apr 08 14:43:03 2005
+++ RemoteFileSelect.pm Fri Apr 08 15:00:24 2005
@@ -705,6 +705,12 @@
$name = $f;
if ( $f =~ /^l/ ) {
$name =~ s/.* (.*) \-\> .*/\1/;
+ if ( $ftp -> cwd($name) ) {
+ substr($f, 0, 1) = "d";
+ if( ! $ftp -> cwd( $dir ) ) {
+ $w -> Error( "Cannot cwd to $dir." );
+ }
+ }
} else {
$name =~ s/.* //;
}