diff options
author | Pascal Rigaux <pixel@mandriva.com> | 1999-07-13 16:23:45 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 1999-07-13 16:23:45 +0000 |
commit | 39b51c96e54f880be2d2fb909f44118a6c209d7c (patch) | |
tree | 86b09fbe4e5042b5fa5b4269d79cf9042993a568 /perl-install/install_steps.pm | |
parent | 925e58d2b3b5fc4adeefcf9f7c3062ba5efde627 (diff) | |
download | drakx-backup-do-not-use-39b51c96e54f880be2d2fb909f44118a6c209d7c.tar drakx-backup-do-not-use-39b51c96e54f880be2d2fb909f44118a6c209d7c.tar.gz drakx-backup-do-not-use-39b51c96e54f880be2d2fb909f44118a6c209d7c.tar.bz2 drakx-backup-do-not-use-39b51c96e54f880be2d2fb909f44118a6c209d7c.tar.xz drakx-backup-do-not-use-39b51c96e54f880be2d2fb909f44118a6c209d7c.zip |
*** empty log message ***
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r-- | perl-install/install_steps.pm | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index fbfc6c12d..ad993b590 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -5,6 +5,7 @@ use strict; use common qw(:file :system); use install_any qw(:all); +use partition_table qw(:types); use run_program; use lilo; use lang; @@ -14,7 +15,6 @@ use cpio; use log; use fsedit; use commands; -use smp; my $o; @@ -46,6 +46,14 @@ sub doPartitionDisks($$) { my ($o, $hds) = @_; fsedit::auto_allocate($hds, $o->{default}->{partitions}); } +sub choosePartitionsToFormat($$) { + my ($o, $fstab) = @_; + + foreach (@$fstab) { + $_->{toFormat} = $_->{mntpoint} && (isExt2($_) || isSwap($_)) && + ($_->{notFormatted} || $o->{default}->{partitionning}->{autoformat}); + } +} sub choosePackages($$$) { my ($o, $packages, $comps) = @_; @@ -55,8 +63,6 @@ sub choosePackages($$$) { foreach (@{$comps->{$_}->{packages}}) { $_->{selected} = 1; } } foreach (@{$o->{default}->{packages}}) { $packages->{$_}->{selected} = 1; } - - smp::detect() and $packages->{"kernel-smp"}->{selected} = 1; } sub beforeInstallPackages($) { |