diff options
author | Peter Palfrader <peter@palfrader.org> | 2021-05-24 11:46:07 +0200 |
---|---|---|
committer | Laura Arjona Reina <larjona@debian.org> | 2021-06-04 12:59:14 +0000 |
commit | 170a4a30be8bcc99090ed3e5c30cc33ef8e5bc52 (patch) | |
tree | 918dee398cdabd1da75d8d79a76806ff7e7659e1 /english/mirror | |
parent | d3366cdcd55b262a3b940e09a75a9992dd575671 (diff) |
mirror/mirror_list: Remove obsolete generate_html_matrix()
Diffstat (limited to 'english/mirror')
-rwxr-xr-x | english/mirror/mirror_list.pl | 55 |
1 files changed, 0 insertions, 55 deletions
diff --git a/english/mirror/mirror_list.pl b/english/mirror/mirror_list.pl index 53aa1fca7a6..260f41c3b31 100755 --- a/english/mirror/mirror_list.pl +++ b/english/mirror/mirror_list.pl @@ -1009,61 +1009,6 @@ END } -# fork of secondary_mirrors -sub generate_html_matrix { - my $archive_name = $_[0]; - my $archive_name_lc = lc($archive_name); - print "<h2 class=\"center\">Mirrors of the Debian-".$archive_name_lc." archive</h2>\n"; - print "<table class=\"volatile\" summary=\"Mirrors sorted by Country\">\n"; - print "<colgroup span=\"5\">\n</colgroup>\n"; - print "<thead><tr><th>HOST NAME</th><th>FTP</th><th>HTTP</th><th>RSYNC</th><th>ARCHITECTURES</th></tr></thead>\n<tbody>\n"; - foreach my $country (sort keys %countries) { - my %our_mirrors; - foreach my $id (@{ $countries{$country} }) { - if (defined $mirror[$id]{method}{"$archive_name_lc-ftp"} || - defined $mirror[$id]{method}{"$archive_name_lc-http"} || - defined $mirror[$id]{method}{"$archive_name_lc-rsync"}) { - $our_mirrors{$id} = 1; - } - } - next unless (keys %our_mirrors); - print "<tr class=\"country\"><th colspan=\"5\">$country</th></tr>\n"; - foreach my $id (@{ $countries{$country} }) { - next unless (exists $our_mirrors{$id}); - print "<tr><th>$mirror[$id]{site}</th>"; - print "<td>"; - if (defined $mirror[$id]{method}{"$archive_name_lc-ftp"}) { - print "<a rel=\"nofollow\" href=\"ftp://$mirror[$id]{site}$mirror[$id]{method}{\"$archive_name_lc-ftp\"}\">"; - print $mirror[$id]{method}{"$archive_name_lc-ftp"}; - print "</a>\n"; - } - print "</td>\n"; - print "<td>"; - if (defined $mirror[$id]{method}{"$archive_name_lc-http"}) { - print "<a rel=\"nofollow\" href=\"http://$mirror[$id]{site}$mirror[$id]{method}{\"$archive_name_lc-http\"}\">"; - print $mirror[$id]{method}{"$archive_name_lc-http"}; - print "</a>\n"; - } - print "</td>\n"; - print "<td>"; - if (defined $mirror[$id]{method}{"$archive_name_lc-rsync"}) { - print "<a href=\"rsync://$mirror[$id]{site}/$mirror[$id]{method}{\"$archive_name_lc-rsync\"}\">"; - print $mirror[$id]{method}{"$archive_name_lc-rsync"}; - print "</a>\n"; - } - print "</td>\n"; - print "<td>"; - if (exists $mirror[$id]{"$archive_name"}) { - print join(" ", sort @{$mirror[$id]{$archive_name}}); - } else { - print " all"; - } - print "</td>\n</tr>\n"; - } - } - print "</tbody>\n</table>\n"; -} - ######### Begin main routine ########################### if (defined $help) { |