From: dms Date: Sun, 19 Nov 2000 14:55:41 +0000 (+0000) Subject: Reduced timeout by 10x X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=d91e84a5fa1b618f2cbdb8b8cc2129763b009b2a;p=infobot.git Reduced timeout by 10x git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@161 c11ca15a-4712-0410-83d8-924469b57eb5 --- diff --git a/blootbot/src/Net.pl b/blootbot/src/Net.pl index 79967da..5a4f0a5 100644 --- a/blootbot/src/Net.pl +++ b/blootbot/src/Net.pl @@ -18,8 +18,8 @@ sub ftpGet { &status("FTP: opening connection to $host.") if ($verbose_ftp); my $ftp = Net::FTP->new($host, - 'Timeout' => 600, - 'BlockSize' => 1024, + 'Timeout' => 1*60, +### 'BlockSize' => 1024, # ??? ); if ($@) { @@ -108,10 +108,10 @@ sub ftpList { return unless &loadPerlModule("Net::FTP"); &status("FTP: opening connection to $host.") if ($verbose_ftp); - my $ftp = Net::FTP->new($host,'Timeout'=>600); + my $ftp = Net::FTP->new($host,'Timeout'=>60); if ($@) { - &ERROR("FTP: $@."); +### &ERROR("FTP: $@."); return; }