diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-14 23:59:01 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-14 23:59:01 +0000 |
| commit | a4299593feb14ed8317da49980b8c06e59688aa2 (patch) | |
| tree | cf2fea27a2884a3205a95d5c3042cdae91be7c66 /perl-install/install_steps.pm | |
| parent | 21066f8c4d8d136cca65f7138cabb25d4b4cfe8c (diff) | |
| download | drakx-a4299593feb14ed8317da49980b8c06e59688aa2.tar drakx-a4299593feb14ed8317da49980b8c06e59688aa2.tar.gz drakx-a4299593feb14ed8317da49980b8c06e59688aa2.tar.bz2 drakx-a4299593feb14ed8317da49980b8c06e59688aa2.tar.xz drakx-a4299593feb14ed8317da49980b8c06e59688aa2.zip | |
no_comment
Diffstat (limited to 'perl-install/install_steps.pm')
| -rw-r--r-- | perl-install/install_steps.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index e5062bd66..859bd58b3 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -121,7 +121,6 @@ sub setupSCSI { #------------------------------------------------------------------------------ sub doPartitionDisks { my ($o, $hds) = @_; - return if $::testing; if ($o->{lnx4win}) { my @l = sort { $a->{device_windobe} cmp $b->{device_windobe} } @@ -144,7 +143,9 @@ sub doPartitionDisks { push @{$real_part->{loopback}}, $root, $swap; } else { - partition_table::write($_) foreach @$hds; + unless ($::testing) { + partition_table::write($_) foreach @$hds; + } } } sub doPartitionDisksLnx4winDev {} |