From 6b7dd05b6135ec3c5a4f921aec948184d714f5c6 Mon Sep 17 00:00:00 2001 From: Yves Duret Date: Sun, 15 Apr 2001 10:57:06 +0000 Subject: bug fix: if cancel pressed in lilo/grub choice => return to mcc normally --- perl-install/bootlook.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/bootlook.pm') diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm index 05ea1075f..84c0adb7f 100644 --- a/perl-install/bootlook.pm +++ b/perl-install/bootlook.pm @@ -409,7 +409,7 @@ sub lilo_choice $::expert=1; ask: local $::isEmbedded = 0; - any::setupBootloader($in, $bootloader, $hds, $fstab, $ENV{SECURE_LEVEL}) or $in->exit(0); + any::setupBootloader($in, $bootloader, $hds, $fstab, $ENV{SECURE_LEVEL}) or return; eval { bootloader::install('', $bootloader, $fstab, $hds) }; if ($@) { $in->ask_warn('', -- cgit v1.2.1