diff options
| -rw-r--r-- | perl-install/install_steps.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 45810de73..fd0907f33 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -502,12 +502,12 @@ GridHeight=70 $o->{$_} eq "1" and $o->{$_} = $l[0] || die _("No floppy drive available"); } - $o->{blank} and $o->copyKernelFromDiskette(); - $o->{updatemodules} and $o->updateModulesFromDiskette(); + $o->{blank} and $o->copyKernelFromFloppy(); + $o->{updatemodules} and $o->updateModulesFromFloppy(); } } -sub copyKernelFromDiskette { +sub copyKernelFromFloppy { my ($o) = @_; return if $::testing || !$o->{blank}; @@ -519,7 +519,7 @@ sub copyKernelFromDiskette { fs::umount("/floppy"); } -sub updateModulesFromDiskette { +sub updateModulesFromFloppy { my ($o) = @_; return if $::testing || !$o->{updatemodules}; |