summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-02-13 11:37:41 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-02-13 11:37:41 +0000
commit138c4c239b44f0730a4593a655fbdbc4f5b5ce9e (patch)
treece769db7edd6911161345050102cf51af2872e12
parentf5f5c7250b85fd56c69bb17e6ac28a1974c3a376 (diff)
downloaddrakx-138c4c239b44f0730a4593a655fbdbc4f5b5ce9e.tar
drakx-138c4c239b44f0730a4593a655fbdbc4f5b5ce9e.tar.gz
drakx-138c4c239b44f0730a4593a655fbdbc4f5b5ce9e.tar.bz2
drakx-138c4c239b44f0730a4593a655fbdbc4f5b5ce9e.tar.xz
drakx-138c4c239b44f0730a4593a655fbdbc4f5b5ce9e.zip
make perl_checker happy
-rwxr-xr-xperl-install/commands2
-rwxr-xr-xperl-install/standalone/drakboot3
2 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/commands b/perl-install/commands
index baa02f232..c37a180c7 100755
--- a/perl-install/commands
+++ b/perl-install/commands
@@ -12,4 +12,4 @@ my $progname = basename($0);
# hack as some functions are defined by perl... so chmod -> chmod_
&{$commands::{$progname} || $commands::{$progname . "_"} || \&err}(@ARGV), exit 0;
-sub err { die "$0: unknown program (unimplemented)\n"; }
+sub err { die "$0: unknown program (unimplemented)\n" }
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) };