summaryrefslogtreecommitdiffstats
path: root/perl-install/install_interactive.pm
diff options
context:
space:
mode:
authorStew Benedict <stewb@mandriva.org>2001-03-03 01:48:49 +0000
committerStew Benedict <stewb@mandriva.org>2001-03-03 01:48:49 +0000
commit091353cf267810593f5c72f014a8d9a6a0d0fbc9 (patch)
treef650a50b38ca7a4244b8f39524f9d276655b3bab /perl-install/install_interactive.pm
parent348d706236d2bf7e09bc8214b657faef0b0a30c5 (diff)
downloaddrakx-091353cf267810593f5c72f014a8d9a6a0d0fbc9.tar
drakx-091353cf267810593f5c72f014a8d9a6a0d0fbc9.tar.gz
drakx-091353cf267810593f5c72f014a8d9a6a0d0fbc9.tar.bz2
drakx-091353cf267810593f5c72f014a8d9a6a0d0fbc9.tar.xz
drakx-091353cf267810593f5c72f014a8d9a6a0d0fbc9.zip
*** empty log message ***
Diffstat (limited to 'perl-install/install_interactive.pm')
-rw-r--r--perl-install/install_interactive.pm7
1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/install_interactive.pm b/perl-install/install_interactive.pm
index f38159fa5..789e557d1 100644
--- a/perl-install/install_interactive.pm
+++ b/perl-install/install_interactive.pm
@@ -172,7 +172,12 @@ When sure, press Ok.")) or return;
print "\n" x 10, _("You can now partition %s.
When you are done, don't forget to save using `w'", partition_table_raw::description($_));
print "\n\n";
- my $pid = fork or exec "fdisk", devices::make($_->{device});
+ my $pid = 0;
+ if (arch() =~ /ppc/) {
+ $pid = fork or exec "pdisk", devices::make($_->{device});
+ } else {
+ $pid = fork or exec "fdisk", devices::make($_->{device});
+ }
waitpid($pid, 0);
}
$o->leave_console;