summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-03-21 14:55:42 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-03-21 14:55:42 +0000
commitb32c4a6739f0c1eeb1d28253c56f83bed5c63869 (patch)
tree5077aa06bae7cb8d611a04077e019de7299516b0
parent49f85bfde6755eafc5089d5d2c5cd97325e6b11c (diff)
downloaddrakx-backup-do-not-use-b32c4a6739f0c1eeb1d28253c56f83bed5c63869.tar
drakx-backup-do-not-use-b32c4a6739f0c1eeb1d28253c56f83bed5c63869.tar.gz
drakx-backup-do-not-use-b32c4a6739f0c1eeb1d28253c56f83bed5c63869.tar.bz2
drakx-backup-do-not-use-b32c4a6739f0c1eeb1d28253c56f83bed5c63869.tar.xz
drakx-backup-do-not-use-b32c4a6739f0c1eeb1d28253c56f83bed5c63869.zip
Factorize code on opening CD tray.
This, and the previous change, fixed bug #14850.
-rw-r--r--perl-install/install_any.pm6
1 files changed, 1 insertions, 5 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index ca4d4c26a..650a8d3d8 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -443,7 +443,6 @@ sub selectSupplMedia {
$cdrom =~ m,^/, or $cdrom = "/dev/$cdrom";
devices::make($cdrom);
ejectCdrom($cdrom);
- openCdromTray($cdrom);
if ($o->ask_okcancel('', N("Insert the CD"), 1)) {
#- mount suppl CD in /mnt/cdrom to avoid umounting /tmp/image
mountCdrom("/mnt/cdrom", $cdrom);
@@ -920,10 +919,7 @@ sub ejectCdrom {
$o_mountpoint and 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();
- };
+ openCdromTray($cdrom);
}
sub warnAboutFilesStillOpen() {