[or-cvs] r18739: {website} timeout should be 15, fix some spacing. (website/trunk)

[phobos at seul.org]

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"; }