Browse code

timeout should be 15, fix some spacing.

Andrew Lewman authored on 02/03/2009 07:33:15
Showing 1 changed files
... ...
@@ -16,7 +16,7 @@ use Date::Format;
16 16
 print "Creating LWP agent ($LWP::VERSION)...\n";
17 17
 my $lua = LWP::UserAgent->new(
18 18
     keep_alive => 1,
19
-    timeout => 1,
19
+    timeout => 15,
20 20
     agent => "Tor MirrorCheck Agent"
21 21
 );
22 22
 
... ...
@@ -667,8 +667,8 @@ open(OUT, "> $outFile") or die "Can't open $outFile: $!";
667 667
 foreach my $server ( sort { $m{$b}{'updateDate'} <=> $m{$a}{'updateDate'}} keys %m ) {
668 668
 
669 669
      my $time;
670
-     if( "$m{$server}{'updateDate'}" ne "Unknown") {
671
-	  if( "$m{$server}{'updateDate'}" eq "$tortime" ) {
670
+     if ( "$m{$server}{'updateDate'}" ne "Unknown") {
671
+	  if ( "$m{$server}{'updateDate'}" eq "$tortime" ) {
672 672
 	    $time = "Up to date";
673 673
 	  } else { $time = "Out of date"; }
674 674
      } else { $time = "Unknown"; }