diff options
| -rw-r--r-- | Rpmdrake/gui.pm | 2 | ||||
| -rwxr-xr-x | Rpmdrake/pkg.pm | 4 |
2 files changed, 3 insertions, 3 deletions
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"), |