diff options
-rwxr-xr-x | rpmdrake | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -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; |