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};