From 5af716381b96fe95e2f4bee654a62f191e5f711a Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Tue, 29 Jan 2002 13:10:22 +0000 Subject: fix thanks to chipaux msg about mkbootdisk --- perl-install/install_steps_interactive.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 834befccd..d4a1de411 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -1184,7 +1184,7 @@ failures. Would you like to create a bootdisk for your system?")), }, [ { val => \$o->{mkbootdisk}, list => \@l, format => sub { $l{$_[0]} || $_[0] } } ] ) or return; } - $o->ask_warn('', _("Insert a floppy in drive %s", $l{$o->{mkbootdisk}} || $o->{mkbootdisk})); + $o->ask_warn('', _("Insert a floppy in %s", $l{$o->{mkbootdisk}} || $o->{mkbootdisk})); } my $w = $o->wait_message('', _("Creating bootdisk")); -- cgit v1.2.1