summaryrefslogtreecommitdiffstats
path: root/examples/gui/files/halt.local
diff options
context:
space:
mode:
Diffstat (limited to 'examples/gui/files/halt.local')
-rwxr-xr-xexamples/gui/files/halt.local24
1 files changed, 0 insertions, 24 deletions
diff --git a/examples/gui/files/halt.local b/examples/gui/files/halt.local
deleted file mode 100755
index e27ad1d..0000000
--- a/examples/gui/files/halt.local
+++ /dev/null
@@ -1,24 +0,0 @@
-#!/usr/bin/perl
-
-use lib qw(/usr/lib/libDrakX);
-use MDK::Common;
-use detect_devices;
-use c;
-
-my ($device) = cat_("/proc/mounts") =~ m!(/dev/\S+)\s+/live/media\s+iso9660!;
-$device or exit;
-
-# try to put halt/reboot in cache, if not called directly from them
-# mount is also needed by end of /etc/init.d/halt
-system("$_ --help &>/dev/null") foreach qw(halt mount reboot);
-
-my $f = detect_devices::tryOpen($device);
-# see openCdromTray() from install::any
-ioctl($f, c::CDROM_LOCKDOOR(), 0); # unlock door
-ioctl($f, c::CDROMEJECT(), 0);
-
-system("clear");
-print "\n\n\nPlease press <Enter> (or <CTRL><J>) once the medium is removed.\n";
-system("read < /dev/console");
-
-ioctl($f, c::CDROMCLOSETRAY(), 0);