From 138c4c239b44f0730a4593a655fbdbc4f5b5ce9e Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 13 Feb 2003 11:37:41 +0000 Subject: make perl_checker happy --- perl-install/standalone/drakboot | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'perl-install/standalone/drakboot') diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot index 7054ed5db..5abdff7f3 100755 --- a/perl-install/standalone/drakboot +++ b/perl-install/standalone/drakboot @@ -27,8 +27,7 @@ if ($in->isa('interactive::gtk')) { kill('USR1', $::CCPID); goto ask; -sub lilo_choice -{ +sub lilo_choice { my $bootloader = bootloader::read(); local ($_) = `detectloader`; $bootloader->{methods} = { lilo => 1, grub => !!/grub/i, if_(arch() =~ /ppc/, yaboot => 1) }; -- cgit v1.2.1