diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-02-13 11:37:41 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-02-13 11:37:41 +0000 |
commit | 138c4c239b44f0730a4593a655fbdbc4f5b5ce9e (patch) | |
tree | ce769db7edd6911161345050102cf51af2872e12 | |
parent | f5f5c7250b85fd56c69bb17e6ac28a1974c3a376 (diff) | |
download | drakx-backup-do-not-use-138c4c239b44f0730a4593a655fbdbc4f5b5ce9e.tar drakx-backup-do-not-use-138c4c239b44f0730a4593a655fbdbc4f5b5ce9e.tar.gz drakx-backup-do-not-use-138c4c239b44f0730a4593a655fbdbc4f5b5ce9e.tar.bz2 drakx-backup-do-not-use-138c4c239b44f0730a4593a655fbdbc4f5b5ce9e.tar.xz drakx-backup-do-not-use-138c4c239b44f0730a4593a655fbdbc4f5b5ce9e.zip |
make perl_checker happy
-rwxr-xr-x | perl-install/commands | 2 | ||||
-rwxr-xr-x | perl-install/standalone/drakboot | 3 |
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) }; |