die handler breaks stuff on wheezy

diff --git a/machines.cgi b/machines.cgi
index f01d4e1..98567ec 100755 (executable)
--- a/machines.cgi
+++ b/machines.cgi
@@ -120,7 +120,7 @@ sub item_uplist($) {
        return $out;
 }
 
-$SIG{__DIE__} = \&DieHandler;
+#$SIG{__DIE__} = \&DieHandler;
 
 my $query = new CGI;
 my $host = lc($query->param('host'));

diff --git a/search.cgi b/search.cgi
index 5a328c0..2757d2f 100755 (executable)
--- a/search.cgi
+++ b/search.cgi
@@ -30,7 +30,7 @@ sub DieHandler {
   $ldap->unbind if (defined($ldap));
 }
 
-$SIG{__DIE__} = \&DieHandler;
+#$SIG{__DIE__} = \&DieHandler;
 
 if (!$dosearch) {
   # No action yet, send back the search form...

diff --git a/update.cgi b/update.cgi
index f1f82f9..5a59a34 100755 (executable)
--- a/update.cgi
+++ b/update.cgi
@@ -42,7 +42,7 @@ sub DieHandler {
   $ldap->unbind if (defined($ldap));
 }
 
-$SIG{__DIE__} = \&DieHandler;
+#$SIG{__DIE__} = \&DieHandler;
 
 $ldap = Net::LDAP->new($config{ldaphost});
 &Util::UpgradeConnection($ldap) unless $config{usessl} eq 'False';