diff options
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 68e4329b4..8158c23e0 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -719,19 +719,19 @@ N("There was an error installing packages:"), $1, N("Go on anyway?") ], 1) and r sub afterInstallPackages($) { my ($o) = @_; my $_w = $o->wait_message('', N("Post-install configuration")); - $o->SUPER::afterInstallPackages($o); + $o->SUPER::afterInstallPackages; } sub copyKernelFromFloppy { my ($o) = @_; $o->ask_okcancel('', N("Please insert the Boot floppy used in drive %s", $o->{blank}), 1) or return; - $o->SUPER::copyKernelFromFloppy(); + $o->SUPER::copyKernelFromFloppy; } sub updateModulesFromFloppy { my ($o) = @_; $o->ask_okcancel('', N("Please insert the Update Modules floppy in drive %s", $o->{updatemodules}), 1) or return; - $o->SUPER::updateModulesFromFloppy(); + $o->SUPER::updateModulesFromFloppy; } #------------------------------------------------------------------------------ @@ -1201,7 +1201,7 @@ sub addUser { sub setupBootloaderBefore { my ($o) = @_; my $_w = $o->wait_message('', N("Preparing bootloader...")); - $o->SUPER::setupBootloaderBefore($o); + $o->SUPER::setupBootloaderBefore; } #------------------------------------------------------------------------------ |