summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-03-01 17:31:33 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-03-01 17:31:33 +0000
commit6162aa3214fa3df4debd19f5123634ea78f6ac4a (patch)
treeeaee252abc46c048ae8d1b8b6a1e21ffc9bbea85 /perl-install
parent3e43be087386f1aacba1b973938e52159ee65022 (diff)
downloaddrakx-backup-do-not-use-6162aa3214fa3df4debd19f5123634ea78f6ac4a.tar
drakx-backup-do-not-use-6162aa3214fa3df4debd19f5123634ea78f6ac4a.tar.gz
drakx-backup-do-not-use-6162aa3214fa3df4debd19f5123634ea78f6ac4a.tar.bz2
drakx-backup-do-not-use-6162aa3214fa3df4debd19f5123634ea78f6ac4a.tar.xz
drakx-backup-do-not-use-6162aa3214fa3df4debd19f5123634ea78f6ac4a.zip
add LVM in important_types2. in expert, have interesting types in the
beginning
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/partition_table.pm7
1 files changed, 3 insertions, 4 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index e7fd1e1ff..16c582c6e 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -16,8 +16,8 @@ use partition_table_raw;
use log;
-@important_types = ('Linux native', arch() =~ /i.86/ ? 'ReiserFS' : (), 'Linux swap', 'Win98 FAT32');
-@important_types2 = ('Linux RAID');
+@important_types = ('Linux native', 'Linux swap', if_(arch() =~ /i.86/, 'ReiserFS', 'DOS FAT16', 'Win98 FAT32'));
+@important_types2 = ('Linux RAID', 'Linux Logical Volume Manager partition');
@fields2save = qw(primary extended totalsectors isDirty needKernelReread);
@@ -194,8 +194,7 @@ my %fs2type = reverse %type2fs;
1;
sub important_types {
- my @l = $::expert ? sort values %types :
- (@important_types, if_($::expert, @important_types2));
+ my @l = (@important_types, if_($::expert, @important_types2, sort values %types));
difference2(\@l, \@bad_types);
}