summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_newt.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install_steps_newt.pm')
-rw-r--r--perl-install/install_steps_newt.pm18
1 files changed, 0 insertions, 18 deletions
diff --git a/perl-install/install_steps_newt.pm b/perl-install/install_steps_newt.pm
index 015de1c05..62db5486b 100644
--- a/perl-install/install_steps_newt.pm
+++ b/perl-install/install_steps_newt.pm
@@ -34,24 +34,6 @@ sub new($$) {
(bless {}, ref $type || $type)->SUPER::new($o);
}
-sub doPartitionDisks($$) {
- my ($o, $hds, $raid) = @_;
-
- Newt::Suspend();
- foreach (@$hds) {
- print
-_("You can now partition your %s hard drive
-When you are done, don't forget to save using `w'", $_->{device});
- print "\n\n";
- my $pid = fork or exec "fdisk", devices::make($_->{device});
- waitpid($pid, 0);
- }
- Newt::Resume();
-
- install_any::getHds($o);
- $o->ask_mntpoint_s($o->{fstab});
-}
-
sub enteringStep {
my ($o, $step) = @_;
$o->SUPER::enteringStep($step);