Andrew Lewman commited on 2013-05-30 18:53:22
Zeige 1 geänderte Dateien mit 3 Einfügungen und 3 Löschungen.
| ... | ... |
@@ -41,7 +41,7 @@ sub sanitize {
|
| 41 | 41 |
sub FetchDate {
|
| 42 | 42 |
my $url = shift; # Base url for mirror |
| 43 | 43 |
my $trace = "project/trace/www-master.torproject.org"; # this file should always exist |
| 44 |
- $url = "$url$trace"; |
|
| 44 |
+ $url = "$url*/*$trace"; |
|
| 45 | 45 |
|
| 46 | 46 |
print "Fetching possible date from: $url\n"; |
| 47 | 47 |
|
| ... | ... |
@@ -1168,7 +1168,7 @@ foreach my $server ( sort { $m{$b}{'updateDate'} <=> $m{$a}{'updateDate'}} keys
|
| 1168 | 1168 |
if ( "$m{$server}{'updateDate'}" ne "Unknown") {
|
| 1169 | 1169 |
if ( $m{$server}{'updateDate'} > $tortime ) {
|
| 1170 | 1170 |
$time = "Up to date"; |
| 1171 |
- } else { $time = "Out of date"; }
|
|
| 1171 |
+ } else { $time = "DO NOT USE. Out of date."; }
|
|
| 1172 | 1172 |
} else { $time = "Unknown"; }
|
| 1173 | 1173 |
print OUT <<"END"; |
| 1174 | 1174 |
\n<tr>\n |
| ... | ... |
@@ -1184,7 +1184,7 @@ END |
| 1184 | 1184 |
rsyncWebsiteMirror => "rsync", |
| 1185 | 1185 |
httpDistMirror => "http", |
| 1186 | 1186 |
httpsDistMirror => "https", |
| 1187 |
- rsyncDistMirrors => "rsync", ); |
|
| 1187 |
+ rsyncDistMirror => "rsync", ); |
|
| 1188 | 1188 |
|
| 1189 | 1189 |
foreach my $precious ( sort keys %prettyNames ) |
| 1190 | 1190 |
{
|
| 1191 | 1191 |