Better fix for bug #9941: don't ever select the whole tree.

1 files changed, 2 insertions, 1 deletions

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;