[Author Prev][Author Next][Thread Prev][Thread Next][Author Index][Thread Index]
[or-cvs] r18739: {website} timeout should be 15, fix some spacing.  (website/trunk)
Author: phobos
Date: 2009-03-02 01:33:15 -0500 (Mon, 02 Mar 2009)
New Revision: 18739
Modified:
   website/trunk/update-mirrors.pl
Log:
timeout should be 15, fix some spacing.
Modified: website/trunk/update-mirrors.pl
===================================================================
--- website/trunk/update-mirrors.pl	2009-03-02 03:46:06 UTC (rev 18738)
+++ website/trunk/update-mirrors.pl	2009-03-02 06:33:15 UTC (rev 18739)
@@ -16,7 +16,7 @@
 print "Creating LWP agent ($LWP::VERSION)...\n";
 my $lua = LWP::UserAgent->new(
     keep_alive => 1,
-    timeout => 1,
+    timeout => 15,
     agent => "Tor MirrorCheck Agent"
 );
 
@@ -667,8 +667,8 @@
 foreach my $server ( sort { $m{$b}{'updateDate'} <=> $m{$a}{'updateDate'}} keys %m ) {
 
      my $time;
-     if( "$m{$server}{'updateDate'}" ne "Unknown") {
-	  if( "$m{$server}{'updateDate'}" eq "$tortime" ) {
+     if ( "$m{$server}{'updateDate'}" ne "Unknown") {
+	  if ( "$m{$server}{'updateDate'}" eq "$tortime" ) {
 	    $time = "Up to date";
 	  } else { $time = "Out of date"; }
      } else { $time = "Unknown"; }