summaryrefslogtreecommitdiffstats
path: root/perl-install/partition_table.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-07-19 21:11:05 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-07-19 21:11:05 +0000
commita5e8813b59dc1133c8fda0ec1493e2622a77624d (patch)
tree80c95304a021c7c9c23dea16d1b0647eefc7a9e8 /perl-install/partition_table.pm
parentfbc50fd0af1a5dda329220b597507e58d1d8ceda (diff)
downloaddrakx-a5e8813b59dc1133c8fda0ec1493e2622a77624d.tar
drakx-a5e8813b59dc1133c8fda0ec1493e2622a77624d.tar.gz
drakx-a5e8813b59dc1133c8fda0ec1493e2622a77624d.tar.bz2
drakx-a5e8813b59dc1133c8fda0ec1493e2622a77624d.tar.xz
drakx-a5e8813b59dc1133c8fda0ec1493e2622a77624d.zip
handling devfs names for cdrom/hds on ide/scsi (needs testing)
Diffstat (limited to 'perl-install/partition_table.pm')
-rw-r--r--perl-install/partition_table.pm13
1 files changed, 9 insertions, 4 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index 2feb0faf3..0c1fd482c 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -343,18 +343,23 @@ sub assign_device_numbers {
log::l("PPC: found a hole on $hd->{prefix} before $_->{start}, skipping device...");
$i++;
}
- $_->{device} = $hd->{prefix} . $i++;
+ $_->{device} = $hd->{prefix} . $i;
+ $_->{devfs_device} = $hd->{devfs_prefix} . '/part' . $i;
$start = $_->{start} + $_->{size};
+ $i++;
}
} else {
foreach (@{$hd->{primary}{raw}}) {
- my $dev = $hd->{prefix} . $i++;
- $_->{device} = $dev;
+ $_->{device} = $hd->{prefix} . $i;
+ $_->{devfs_device} = $hd->{devfs_prefix} . '/part' . $i;
+ $i++;
}
foreach (map { $_->{normal} } @{$hd->{extended} || []}) {
- my $dev = $hd->{prefix} . $i++;
+ my $dev = $hd->{prefix} . $i;
push @{$hd->{partitionsRenumbered}}, [ $_->{device}, $dev ] if $_->{device} && $dev ne $_->{device};
$_->{device} = $dev;
+ $_->{devfs_device} = $hd->{devfs_prefix} . '/part' . $i;
+ $i++;
}
}