From fd0744fb5c785e7d985f9defed6157500cc5b0bc Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Mon, 26 Jul 2004 09:37:20 +0000 Subject: Better fix for bug #9941: don't ever select the whole tree. --- rpmdrake | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/rpmdrake b/rpmdrake index a0bae5fa..4d6185b6 100755 --- a/rpmdrake +++ b/rpmdrake @@ -506,12 +506,13 @@ or you already installed all of them.")); partialsel_unsel => sub { my ($unsel, $sel) = @_; @$sel = grep { exists $pkgs->{$_} } @$sel; - @$unsel <= @$sel; + @$unsel < @$sel; }, toggle_nodes => sub { my ($set_state, @nodes) = @_; @nodes = grep { exists $pkgs->{$_} } @nodes or return; + return if @nodes == keys %$pkgs; #- avoid selecting every package my $new_state = !$pkgs->{$nodes[0]}{selected}; my @nodes_with_deps; -- cgit v1.2.1