From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
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=b3c9a0a17c1049d3ec6130239d85f00ff80be9e6;p=infobot.git

Reduced timeout by 10x


git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@161 c11ca15a-4712-0410-83d8-924469b57eb5
---

diff --git a/src/Net.pl b/src/Net.pl
index 79967da..5a4f0a5 100644
--- a/src/Net.pl
+++ b/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;
     }