about summary refs log tree commit
diff options
context:
space:
mode:
-rw-r--r--Net/FTP.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/Net/FTP.pm b/Net/FTP.pm
index 01e3649..83e5f3d 100644
--- a/Net/FTP.pm
+++ b/Net/FTP.pm
@@ -943,7 +943,8 @@ sub _dataconn {
       PeerAddr  => join(".", @port[0 .. 3]),
       PeerPort  => $port[4] * 256 + $port[5],
       LocalAddr => ${*$ftp}{'net_ftp_localaddr'},
-      Proto     => 'tcp'
+      Proto     => 'tcp',
+      Timeout   => $ftp->timeout
     );
   }
   elsif (defined ${*$ftp}{'net_ftp_listen'}) {