diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-07-29 20:33:20 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-07-29 20:33:20 +0000 |
commit | 667f6dc5830137b4cd9d9b4969960486213c2049 (patch) | |
tree | 84d080ba2cfe748868b8abb4a317fc534f258736 /perl-install/partition_table.pm | |
parent | 4bb92a5afc413774bbc1e94b70bb1064bb40666f (diff) | |
download | drakx-backup-do-not-use-667f6dc5830137b4cd9d9b4969960486213c2049.tar drakx-backup-do-not-use-667f6dc5830137b4cd9d9b4969960486213c2049.tar.gz drakx-backup-do-not-use-667f6dc5830137b4cd9d9b4969960486213c2049.tar.bz2 drakx-backup-do-not-use-667f6dc5830137b4cd9d9b4969960486213c2049.tar.xz drakx-backup-do-not-use-667f6dc5830137b4cd9d9b4969960486213c2049.zip |
cleanup
Diffstat (limited to 'perl-install/partition_table.pm')
-rw-r--r-- | perl-install/partition_table.pm | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm index b7ddb5cb5..4912f7fc3 100644 --- a/perl-install/partition_table.pm +++ b/perl-install/partition_table.pm @@ -735,10 +735,12 @@ sub add { eval { add_primary($hd, $part) }; goto success if !$@; } - eval { add_extended($hd, $part, $primaryOrExtended) } if $hd->hasExtended; #- try adding extended - if ($@ || !$hd->hasExtended) { - eval { add_primary($hd, $part) }; - die $@ if $@; #- send the add extended error which should be better + if ($hd->hasExtended) { + eval { add_extended($hd, $part, $primaryOrExtended) }; + goto success if !$@; + } + { + add_primary($hd, $part); } success: assign_device_numbers($hd); |