X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FDoShow.pm;h=6f8a71ce8a300c9b2b840f98f4abcbd7858cf640;hb=3f085acbf01251255c4f6e4786b0439ff424d979;hp=1261544a0ecebc4d9dac6603607741ed7781d253;hpb=01393b020237bbfa4571d41cc98899b4d25acd8b;p=deb%2Fpackages.git
diff --git a/lib/Packages/DoShow.pm b/lib/Packages/DoShow.pm
index 1261544..6f8a71c 100644
--- a/lib/Packages/DoShow.pm
+++ b/lib/Packages/DoShow.pm
@@ -82,7 +82,7 @@ sub do_show {
if ($suite eq $_) {
$$menu .= "[ $_ ] ";
} else {
- $$menu .= "[ $suite})."\">$_ ] ";
+ $$menu .= "[ $_})."\">$_ ] ";
}
}
$$menu .= '
';
@@ -382,19 +382,9 @@ sub do_show {
foreach( @$source_files ) {
my ($src_file_md5, $src_file_size, $src_file_name)
= split /\s+/, $_;
- my $src_url;
- for ("$suite/$archive") {
- /security/o && do {
- $src_url = $FTP_SITES{security}; last };
- /volatile/o && do {
- $src_url = $FTP_SITES{volatile}; last };
- /backports/o && do {
-
- $src_url = $FTP_SITES{backports}; last };
- /non-us/io && do {
- $src_url = $FTP_SITES{'non-US'}; last };
- $src_url = $FTP_SITES{us};
- }
+ (my $server = lc $archive) =~ s/-//go; # non-US hack
+ my $src_url = $FTP_SITES{$server}
+ || $FTP_SITES{us};
$src_url .= "/$source_dir/$src_file_name";
$package_page .= "