diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-08-31 22:54:14 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-08-31 22:54:14 +0000 |
commit | 88c62ebff103a32022c3e72a131b98998d2f5703 (patch) | |
tree | 30a71a68bfb16cf36b531b818d459b3235f84a30 | |
parent | 76b2c0cc5bbbe8ed9710734fe4223047f753ef0f (diff) | |
download | rpmdrake-88c62ebff103a32022c3e72a131b98998d2f5703.tar rpmdrake-88c62ebff103a32022c3e72a131b98998d2f5703.tar.gz rpmdrake-88c62ebff103a32022c3e72a131b98998d2f5703.tar.bz2 rpmdrake-88c62ebff103a32022c3e72a131b98998d2f5703.tar.xz rpmdrake-88c62ebff103a32022c3e72a131b98998d2f5703.zip |
(get_details) kill unused parameter
-rw-r--r-- | Rpmdrake/gui.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm index 39726352..43bb246c 100644 --- a/Rpmdrake/gui.pm +++ b/Rpmdrake/gui.pm @@ -203,7 +203,7 @@ sub get_main_text { } sub get_details { - my ($key, $pkg, $upkg, $installed_version, $raw_medium) = @_; + my ($pkg, $upkg, $installed_version, $raw_medium) = @_; my $a = ugtk2::markup_to_TextView_format( $spacing . join("\n$spacing", format_field(N("Version: ")) . version_release($upkg), @@ -294,7 +294,7 @@ sub format_pkg_simplifiedinfo { my $installed_version = eval { find_installed_version($upkg) }; push @$s, [ gtkadd(gtkshow(my $details_exp = Gtk2::Expander->new(format_field(N("Details:")))), - gtknew('TextView', text => get_details($key, $pkg, $upkg, $installed_version, $raw_medium))) ]; + gtknew('TextView', text => get_details($pkg, $upkg, $installed_version, $raw_medium))) ]; $details_exp->set_use_markup(1); push @$s, [ "\n\n" ]; push @$s, [ build_expander($pkg, N("Files:"), 'files', sub { files_format($pkg->{files}) }) ]; |