From 800ef4b1c55673b682b6ed4787bbeeab9991289d Mon Sep 17 00:00:00 2001 From: Martin Whitaker Date: Tue, 23 Oct 2018 20:37:33 +0100 Subject: examples: remove halt-local service - it doesn't work. --- examples/minimal/files/halt.local | 24 ------------------------ 1 file changed, 24 deletions(-) delete mode 100755 examples/minimal/files/halt.local (limited to 'examples/minimal/files/halt.local') diff --git a/examples/minimal/files/halt.local b/examples/minimal/files/halt.local deleted file mode 100755 index e27ad1d..0000000 --- a/examples/minimal/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 (or ) once the medium is removed.\n"; -system("read < /dev/console"); - -ioctl($f, c::CDROMCLOSETRAY(), 0); -- cgit v1.2.1