summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-02-08 16:13:28 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-02-08 16:13:28 +0000
commit7978b0a3ffe13c32afe5ab97f56930303b2b5588 (patch)
tree91b0be1a461d9ff954963e9469baf552f637d716 /perl-install
parentcc3b1171c0826bf68f9d9129471b93934b36b6c5 (diff)
downloaddrakx-7978b0a3ffe13c32afe5ab97f56930303b2b5588.tar
drakx-7978b0a3ffe13c32afe5ab97f56930303b2b5588.tar.gz
drakx-7978b0a3ffe13c32afe5ab97f56930303b2b5588.tar.bz2
drakx-7978b0a3ffe13c32afe5ab97f56930303b2b5588.tar.xz
drakx-7978b0a3ffe13c32afe5ab97f56930303b2b5588.zip
when the partition table is empty, try to see if we are not using the plain disk
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/fsedit.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm
index 86278aaeb..fd2f89e04 100644
--- a/perl-install/fsedit.pm
+++ b/perl-install/fsedit.pm
@@ -160,8 +160,12 @@ sub get_hds {
my $handled;
eval {
catch_cdie {
- partition_table::read($hd);
- compare_with_proc_partitions($hd) if $::isInstall;
+ partition_table::read($hd);
+ if (listlength(partition_table::get_normal_parts($hd)) == 0) {
+ $handled = 1 if $handle_die_and_cdie->();
+ } else {
+ compare_with_proc_partitions($hd) if $::isInstall;
+ }
} sub {
my $err = $@;
if ($handle_die_and_cdie->()) {