summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-12-15 12:50:29 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-12-15 12:50:29 +0000
commit3bc20c1ea1a306475ea8eab8e8e1973625ca785f (patch)
tree5cecbffa4160d47c8de483e723474ec668c0bcc6 /perl-install/install_any.pm
parent42ded0f5b50145273e019818e4e3eb002667aff8 (diff)
downloaddrakx-3bc20c1ea1a306475ea8eab8e8e1973625ca785f.tar
drakx-3bc20c1ea1a306475ea8eab8e8e1973625ca785f.tar.gz
drakx-3bc20c1ea1a306475ea8eab8e8e1973625ca785f.tar.bz2
drakx-3bc20c1ea1a306475ea8eab8e8e1973625ca785f.tar.xz
drakx-3bc20c1ea1a306475ea8eab8e8e1973625ca785f.zip
no_comment
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r--perl-install/install_any.pm7
1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index da0a773a2..369227b9a 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -122,13 +122,18 @@ sub setPackages($) {
push @{$o->{default_packages}}, "kernel-secure" if $o->{security} > 3;
push @{$o->{default_packages}}, "kernel-smp" if $o->{security} <= 3 && detect_devices::hasSMP(); #- no need for kernel-smp if we have kernel-secure which is smp
push @{$o->{default_packages}}, "kernel-pcmcia-cs" if $o->{pcmcia};
+ push @{$o->{default_packages}}, "apmd" if $o->{pcmcia};
push @{$o->{default_packages}}, "raidtools" if !is_empty_hash_ref($o->{raid});
pkgs::getDeps($o->{packages});
my $c; ($o->{compss}, $c) = pkgs::readCompss($o->{packages});
$o->{compssListLevels} = pkgs::readCompssList($o->{packages}, $c);
- $o->{compssUsers} = pkgs::readCompssUsers($o->{packages}, $o->{compss});
+ ($o->{compssUsers}, $o->{compssUsersSorted}) = pkgs::readCompssUsers($o->{packages}, $o->{compss});
+
+ my @l = ();
+ push @l, "kapm" if $o->{pcmcia};
+ $_->{values} = [ map { $_ + 50 } @{$_->{values}} ] foreach grep {$_} map { $o->{packages}{$_} } @l;
grep { !$o->{packages}{$_} && log::l("missing base package $_") } @{$o->{base}} and die "missing some base packages";
} else {