diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-09-16 20:35:31 +0000 | |||||||
---|---|---|---|---|---|---|---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-09-16 20:35:31 +0000 | |||||||
commit | 31fb2c2e9d3025bc7dbad038c632ab8a34a9a310 (patch) | ||||||||
tree | 1d97767119a0f13e5b5c70ac0283dd4dd36a12f0 /perl-install/pkgs.pm | ||||||||
parent | 1130e84c3a27b0c1c6a05981137975b5c-rw-r--r-- | perl-install/ChangeLog | 20 | |
1 files changed, 19 insertions, 1 deletions
diff --git a/perl-install/ChangeLog b/perl-install/ChangeLog /td>index 479045d19..378746c14 100644 --- a/perl-install/ChangeLog +++ b/perl-install/ChangeLog |
more up to my need ALL flag in compssUsersChoice
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r-- | perl-install/pkgs.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index 14e0ff633..b938aa710 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -708,7 +708,7 @@ sub setSelectedFromCompssList { my ($rate, @flags) = packageRateRFlags($p); next if !$rate || $rate < $min_level || - !$compssUsersChoice->{ALL} && grep { !grep { /^!(.*)/ ? !$compssUsersChoice->{$1} : $compssUsersChoice->{$_} } split('\|\|') } @flags; + grep { !grep { /^!(.*)/ ? !$compssUsersChoice->{$1} : $compssUsersChoice->{$_} } split('\|\|') } @flags; #- determine the packages that will be selected when #- selecting $p. the packages are not selected. |