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/install_any.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install/install_any.pm') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index cb5562244..b8073dac3 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -914,6 +914,7 @@ sub ejectCdrom { #- D state if the cdrom is already removed eval { fs::umount($o_mountpoint) }; $@ and warnAboutFilesStillOpen(); + return if is_xbox(); eval { my $dev = detect_devices::tryOpen($cdrom); ioctl($dev, c::CDROMEJECT(), 1) if ioctl($dev, c::CDROM_DRIVE_STATUS(), 0) == c::CDS_DISC_OK(); -- cgit v1.2.1