summaryrefslogtreecommitdiffstats
path: root/perl-install/partition_table.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-06-05 19:10:21 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-06-05 19:10:21 +0000
commitf4f2d5e5a0ad224db2e5983054657b3cefdc9d06 (patch)
tree3b12d5f8e1b6156a44ab859e9f49f83e3faec223 /perl-install/partition_table.pm
parentdb2b62bdd8670a29de6ad645f28a48d758b3cb84 (diff)
downloaddrakx-f4f2d5e5a0ad224db2e5983054657b3cefdc9d06.tar
drakx-f4f2d5e5a0ad224db2e5983054657b3cefdc9d06.tar.gz
drakx-f4f2d5e5a0ad224db2e5983054657b3cefdc9d06.tar.bz2
drakx-f4f2d5e5a0ad224db2e5983054657b3cefdc9d06.tar.xz
drakx-f4f2d5e5a0ad224db2e5983054657b3cefdc9d06.zip
no_comment
Diffstat (limited to 'perl-install/partition_table.pm')
-rw-r--r--perl-install/partition_table.pm9
1 files changed, 5 insertions, 4 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index 4b77d5d6a..82eb6a4c5 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -22,7 +22,7 @@ use log;
@important_types = ('Linux native', 'Linux swap', 'Win98 FAT32');
-@important_types2 = ('ReiserFS', 'Linux RAID');
+@important_types2 = (arch() =~ /i.86/ ? 'ReiserFS' : (), 'Linux RAID');
@fields2save = qw(primary extended totalsectors);
@@ -32,9 +32,9 @@ my %types = (
arch() =~ /^ppc/ ? (
0x401 => 'Apple Partition',
0x402 => 'Apple HFS Partition',
-) : (
+) : arch() =~ /^i.86/ ? (
0x183 => 'ReiserFS',
-), arch() =~ /^sparc/ ? (
+) : arch() =~ /^sparc/ ? (
0x1 => 'SunOS boot',
0x2 => 'SunOS root',
0x3 => 'SunOS swap',
@@ -345,7 +345,8 @@ sub get_normal_parts($) {
sub get_holes($) {
my ($hd) = @_;
- my $start = 1;
+ my $start = arch() eq "alpha" ? 2048 : 1;
+
map {
my $current = $start;
$start = $_->{start} + $_->{size};