X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FDoShow.pm;h=f40d1a21553eb5785eda35c072d9c6eaabb53dc6;hb=4fec9449ddf3d2a6162c05387367746f3e17e329;hp=01590653cf64edcddb1d8e7f9446e26e22fa05e1;hpb=1a21b74ad9ccf9572750caaed6d5e22cd395fa47;p=deb%2Fpackages.git diff --git a/lib/Packages/DoShow.pm b/lib/Packages/DoShow.pm index 0159065..f40d1a2 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 @@ -254,7 +254,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 +286,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 +490,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 ) {