summaryrefslogtreecommitdiffstats
path: root/perl-install/fsedit.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-09-17 10:33:54 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-09-17 10:33:54 +0000
commit1ea3578bfb4c6b4ef7b3854ce4561d8bc9afaef4 (patch)
treef7c69b2ee55ed40ab4f6c0fa4e5e5f26b3239f84 /perl-install/fsedit.pm
parent69617c268cef38da90a2a40dd8ec3c2b385a09e9 (diff)
downloaddrakx-backup-do-not-use-1ea3578bfb4c6b4ef7b3854ce4561d8bc9afaef4.tar
drakx-backup-do-not-use-1ea3578bfb4c6b4ef7b3854ce4561d8bc9afaef4.tar.gz
drakx-backup-do-not-use-1ea3578bfb4c6b4ef7b3854ce4561d8bc9afaef4.tar.bz2
drakx-backup-do-not-use-1ea3578bfb4c6b4ef7b3854ce4561d8bc9afaef4.tar.xz
drakx-backup-do-not-use-1ea3578bfb4c6b4ef7b3854ce4561d8bc9afaef4.zip
try to get geometry from EDD
Diffstat (limited to 'perl-install/fsedit.pm')
-rw-r--r--perl-install/fsedit.pm10
1 files changed, 6 insertions, 4 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm
index ddc6a47fd..1072464c7 100644
--- a/perl-install/fsedit.pm
+++ b/perl-install/fsedit.pm
@@ -104,14 +104,16 @@ sub get_hds {
my @drives = detect_devices::hds();
- my (@hds, @raw_hds);
foreach my $hd (@drives) {
$hd->{file} = devices::make($hd->{device});
$hd->{prefix} ||= $hd->{device};
- $hd->{readonly} = $flags->{readonly};
+ }
+
+ partition_table::raw::get_geometries(\@drives);
- my $h = partition_table::raw::get_geometry($hd->{file}) or log::l("An error occurred while getting the geometry of block device $hd->{file}: $!"), next;
- add2hash_($hd, $h);
+ my (@hds, @raw_hds);
+ foreach my $hd (@drives) {
+ $hd->{readonly} = $flags->{readonly};
eval { partition_table::raw::test_for_bad_drives($hd) };
if (my $err = $@) {