X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FDoShow.pm;h=bd7860f04f4953b5cd400b361c6567f96805bf8d;hb=4c6c02445d6bd955db66d82946b8c955b1f43615;hp=01590653cf64edcddb1d8e7f9446e26e22fa05e1;hpb=1a21b74ad9ccf9572750caaed6d5e22cd395fa47;p=deb%2Fpackages.git diff --git a/lib/Packages/DoShow.pm b/lib/Packages/DoShow.pm index 0159065..bd7860f 100644 --- a/lib/Packages/DoShow.pm +++ b/lib/Packages/DoShow.pm @@ -201,7 +201,7 @@ sub do_show { my $provided_by = $page->{provided_by}; $contents{providers} = []; - pkg_list( \%packages, $opts, $provided_by, 'en', $contents{providers} ) if $provided_by; + pkg_list( \%packages, $opts, $provided_by, $contents{providers} ) if $provided_by; # # display dependencies @@ -231,7 +231,8 @@ sub do_show { $d{version} = $versions->{$a} if $multiple_versions; $d{archive} = $archives->{$a}; if ( ($suite ne "experimental") - && ($subsection ne 'debian-installer')) { + && ($subsection ne 'debian-installer') + && ($suite !~ /-(backports|updates)$/)) { $d{contents_avail} = 1; } push @downloads, \%d; @@ -254,7 +255,7 @@ sub do_show { my $provided_by = $page->{provided_by}; $contents{providers} = []; - pkg_list( \%packages, $opts, $provided_by, 'en', $contents{providers} ); + pkg_list( \%packages, $opts, $provided_by, $contents{providers} ); } # else (unless $page->is_virtual) } else { # unless $opts->{source} @@ -286,7 +287,7 @@ sub do_show { my $binaries = find_binaries( $pkg, $archive, $suite, \%src2bin ); if ($binaries && @$binaries) { $contents{binaries} = []; - pkg_list( \%packages, $opts, $binaries, 'en', $contents{binaries} ); + pkg_list( \%packages, $opts, $binaries, $contents{binaries} ); } # @@ -490,7 +491,7 @@ sub build_deps { } # end print_deps sub pkg_list { - my ( $packages, $opts, $pkgs, $lang, $list ) = @_; + my ( $packages, $opts, $pkgs, $list ) = @_; my $suite = $opts->{suite}[0]; foreach my $p ( sort @$pkgs ) {