From ae1964f83e161b508de9fd17edf0e5077cd3d415 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 26 Mar 2007 11:10:01 +0000 Subject: (get_pkgs) do not pass a useless parameter --- Rpmdrake/gui.pm | 2 +- Rpmdrake/pkg.pm | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) (limited to 'Rpmdrake') diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm index 6bce5bea..8d82f42a 100644 --- a/Rpmdrake/gui.pm +++ b/Rpmdrake/gui.pm @@ -428,7 +428,7 @@ sub switch_pkg_list_mode { sub pkgs_provider { my ($options, $mode, %options) = @_; return if !$mode; - my $h = &get_pkgs($urpm, $options); # was given (1, @_) for updates + my $h = &get_pkgs($options); # was given (1, @_) for updates ($urpm, $descriptions) = @$h{qw(urpm update_descr)}; $pkgs = $h->{all_pkgs}; %filter_methods = ( diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index 200ece85..24940866 100755 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -221,7 +221,7 @@ Then, restart %s.", $rpmdrake::myname_update)), myexit(-1); our $probe_only_for_updates; sub get_pkgs { - my ($urpm, $opts) = @_; + my ($opts) = @_; my %update_descr; @update_medias = (); my $w = $::main_window; @@ -231,7 +231,7 @@ sub get_pkgs { my $_flush_guard = Gtk2::GUI_Update_Guard->new; my $error_happened; - $urpm = urpm->new; + my $urpm = urpm->new; $urpm->{fatal} = sub { $error_happened = 1; interactive_msg(N("Fatal error"), -- cgit v1.2.1