aboutsummaryrefslogtreecommitdiffstats
path: root/Rpmdrake
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2007-03-06 16:29:53 +0000
committerThierry Vignaud <tv@mandriva.org>2007-03-06 16:29:53 +0000
commit02e83f907e55d865ff3225c8661eb4e49c413184 (patch)
tree5d635f7c9825e5b22ad3831d3de52f191a5bb820 /Rpmdrake
parent2bcd6e8750fe7b31847b516410d0e98f8c4c8ef8 (diff)
downloadrpmdrake-02e83f907e55d865ff3225c8661eb4e49c413184.tar
rpmdrake-02e83f907e55d865ff3225c8661eb4e49c413184.tar.gz
rpmdrake-02e83f907e55d865ff3225c8661eb4e49c413184.tar.bz2
rpmdrake-02e83f907e55d865ff3225c8661eb4e49c413184.tar.xz
rpmdrake-02e83f907e55d865ff3225c8661eb4e49c413184.zip
(pkgs_provider) if "pure_updates" option is given, do not pass over installable packages
Diffstat (limited to 'Rpmdrake')
-rw-r--r--Rpmdrake/gui.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index 32d37229..e6a4273e 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -397,7 +397,7 @@ sub switch_pkg_list_mode {
}
sub pkgs_provider {
- my ($options, $mode) = @_;
+ my ($options, $mode, %options) = @_;
return if !$mode;
my $h = &get_pkgs($urpm, $options); # was given (1, @_) for updates
($urpm, $descriptions) = @$h{qw(urpm update_descr)};
@@ -406,7 +406,7 @@ sub pkgs_provider {
installed => sub { $pkgs = $h->{installed} },
non_installed => sub { $pkgs = $h->{installable} },
all_updates => sub {
- my @pkgs = grep { my $p = $h->{installable}{$_}; $p->{pkg} && !$p->{selected} && $p->{pkg}->flag_installed && $p->{pkg}->flag_upgrade } keys %{$h->{installable}};
+ my @pkgs = $options{pure_updates} ? () : (grep { my $p = $h->{installable}{$_}; $p->{pkg} && !$p->{selected} && $p->{pkg}->flag_installed && $p->{pkg}->flag_upgrade } keys %{$h->{installable}});
$pkgs = {
(map { $_ => $h->{updates}{$_} } keys %{$h->{updates}}),
(map { $_ => $h->{installable}{$_} } @pkgs)