From 43377d2b8a3bbead12699b2984ca96e4c7e5d900 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Thu, 26 Jul 2001 15:43:49 +0000 Subject: add support for new modules load as described by GG. --- perl-install/install_steps_interactive.pm | 12 ++++++++++++ 1 file changed, 12 insertions(+) (limited to 'perl-install') diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 5b5fb804f..efed8f480 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -727,6 +727,18 @@ sub afterInstallPackages($) { $o->SUPER::afterInstallPackages($o); } +sub copyKernelFromDiskette { + my ($o) = @_; + $o->ask_warn('', _("Please insert the Boot floppy used in drive %s", $o->{blank})); + $o->SUPER::copyKernelFromDiskette(); +} + +sub updateModulesFromDiskette { + my ($o) = @_; + $o->ask_warn('', _("Please insert the Update Modules floppy in drive %s", $o->{updatemodules})); + $o->SUPER::updateModulesFromDiskette(); +} + #------------------------------------------------------------------------------ sub configureNetwork { my ($o, $first_time) = @_; -- cgit v1.2.1