diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-03-12 15:55:55 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-03-12 15:55:55 +0000 |
| commit | 8fe0ce392f4dde3174c593ed2a2cf0e7add4171a (patch) | |
| tree | a58c108d8da836812eb65cabbbfabb3f8ad79e2f /perl-install/install_any.pm | |
| parent | 4bd77b159315f5c646efb2ed622b929ae5904551 (diff) | |
| download | drakx-backup-do-not-use-8fe0ce392f4dde3174c593ed2a2cf0e7add4171a.tar drakx-backup-do-not-use-8fe0ce392f4dde3174c593ed2a2cf0e7add4171a.tar.gz drakx-backup-do-not-use-8fe0ce392f4dde3174c593ed2a2cf0e7add4171a.tar.bz2 drakx-backup-do-not-use-8fe0ce392f4dde3174c593ed2a2cf0e7add4171a.tar.xz drakx-backup-do-not-use-8fe0ce392f4dde3174c593ed2a2cf0e7add4171a.zip | |
put everything in %compssUsers, use field flags for the flags :)
Diffstat (limited to 'perl-install/install_any.pm')
| -rw-r--r-- | perl-install/install_any.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 9260cbb39..23beb47bc 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -316,11 +316,10 @@ sub setPackages { $o->{compss} = pkgs::readCompss($o->{prefix}, $o->{packages}); #- must be done after getProvides pkgs::read_rpmsrate($o->{packages}, getFile("Mandrake/base/rpmsrate")); - ($o->{compssUsers}, $o->{compssUsersSorted}, $o->{compssUsersIcons}, $o->{compssUsersDescr}) = - pkgs::readCompssUsers($o->{packages}, $o->{meta_class}); + ($o->{compssUsers}, $o->{compssUsersSorted}) = pkgs::readCompssUsers($o->{packages}, $o->{meta_class}); if ($::auto_install && !$o->{compssUsersChoice}) { - $o->{compssUsersChoice}{$_} = 1 foreach map { @{$o->{compssUsers}{$_}} } @{$o->{compssUsersSorted}}; + $o->{compssUsersChoice}{$_} = 1 foreach map { @{$o->{compssUsers}{$_}{flags}} } @{$o->{compssUsersSorted}}; } $o->{compssUsersChoice}{SYSTEM} = 1; $o->{compssUsersChoice}{BURNER} = 1 if detect_devices::burners(); |