diff -Nur -x '*.orig' -x '*.rej' smeserver-arkeia-1.0/root/etc/e-smith/events/actions/eject-tape mezzanine_patched_smeserver-arkeia-1.0/root/etc/e-smith/events/actions/eject-tape --- smeserver-arkeia-1.0/root/etc/e-smith/events/actions/eject-tape 2004-07-26 10:31:46.000000000 -0600 +++ mezzanine_patched_smeserver-arkeia-1.0/root/etc/e-smith/events/actions/eject-tape 1969-12-31 17:00:00.000000000 -0700 @@ -1,22 +0,0 @@ -#!/usr/bin/perl -w - -package esmith; - -use strict; -use esmith::ConfigDB; - -my $event = shift; -my $cause = shift || "unknown"; -exit 0 if $cause eq "desktop"; - -my $confdb = esmith::ConfigDB->open_ro; -my $backup = $confdb->get('backup') or die "No backup db entry found\n"; -my $device = $backup->prop('Device') || '/dev/st0'; -my $eject = $backup->prop('Eject') || 'no'; - -exit 0 unless $device =~ /[sh]t/; - -if (lc($eject) eq 'yes') { - exec("/bin/mt", "-f", $device, "eject") if $eject eq 'Yes' || $eject eq 'yes'; - die("A problem occurred execing mt"); -}