From d2a832531e9ac67039eee97aeec52710a1edea5e Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 9 Jan 2004 10:21:08 +0000
Subject: remove a few other SIG{__DIE__}

---
 perl-install/fs.pm                | 1 -
 perl-install/install_steps_gtk.pm | 3 ---
 2 files changed, 4 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index 8d3d37ad8..7752e8e79 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -682,7 +682,6 @@ sub formatMount_all {
     #- for fun :)
     #- that way, when install exits via ctrl-c, it gives hand to partition
     eval {
-	local $SIG{__DIE__} = 'ignore';
 	my ($_type, $major, $minor) = devices::entry(fsedit::get_root($fstab)->{device});
 	output "/proc/sys/kernel/real-root-dev", makedev($major, $minor);
     };
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index ba34a9205..7469c84a7 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -28,9 +28,6 @@ use log;
 sub new($$) {
     my ($type, $o) = @_;
 
-    my $old = $SIG{__DIE__};
-    $SIG{__DIE__} = sub { $_[0] !~ /ugtk2\.pm/ and goto $old };
-
     $ENV{DISPLAY} ||= $o->{display} || ":0";
     my $wanted_DISPLAY = $::testing && -x '/usr/X11R6/bin/Xnest' ? ':9' : $ENV{DISPLAY};
 
-- 
cgit v1.2.1