From 6026ccf19a651838544a1fd6ecddf6310d00f6fb Mon Sep 17 00:00:00 2001 From: Stew Benedict Date: Tue, 15 Mar 2005 19:56:26 +0000 Subject: Install kernel-xbox on XBOX, bypass bootloader setup and eject call --- perl-install/pkgs.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/pkgs.pm') diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index b30ad3785..aa9e54d11 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -176,7 +176,7 @@ sub packageById { sub analyse_kernel_name { my $kernels = join('|', map { "-$_" } '(p3|i586|i686)-(up|smp)-(1GB|4GB|64GB)', - qw(enterprise secure smp multimedia multimedia-smp), + qw(enterprise secure smp multimedia multimedia-smp xbox), ); my @l = $_[0] =~ /kernel[^\-]*($kernels)?(-([^\-]+))?$/ or return; $l[0], $l[-1]; @@ -205,6 +205,7 @@ sub bestKernelPackage { @kernels = @l; } my @prefered_exts = + is_xbox() ? '-xbox' : detect_devices::is_i586() ? '-i586-up-1GB' : detect_devices::BIGMEM() ? ('-enterprise', '-smp') : detect_devices::hasSMP() ? '-smp' : -- cgit v1.2.1