summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2007-11-06 15:22:02 +0000
committerThierry Vignaud <tv@mandriva.org>2007-11-06 15:22:02 +0000
commitcac00625d50a54c964a4baf8c5fe223c9a996b82 (patch)
tree1c56d23b8f9b7e765ebf9939cab0912d4936c393 /perl-install
parentd20e6aac3b8e38db725402a8c1a4423a9a541f6a (diff)
downloaddrakx-cac00625d50a54c964a4baf8c5fe223c9a996b82.tar
drakx-cac00625d50a54c964a4baf8c5fe223c9a996b82.tar.gz
drakx-cac00625d50a54c964a4baf8c5fe223c9a996b82.tar.bz2
drakx-cac00625d50a54c964a4baf8c5fe223c9a996b82.tar.xz
drakx-cac00625d50a54c964a4baf8c5fe223c9a996b82.zip
keep buggy process around so that we can run gdb on it (if perl segfaulted)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS2
-rw-r--r--perl-install/standalone.pm3
2 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index e4f11901e..8f52cf322 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,5 @@
+- drakbug:
+ o keep buggy process around so that we can run gdb on it (if perl segfaulted)
- harddrake: detect storage and various controllers before anything else
(so that storage devices get detected at first boot on live)
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm
index 34b283979..42f73744f 100644
--- a/perl-install/standalone.pm
+++ b/perl-install/standalone.pm
@@ -213,7 +213,8 @@ sub bug_handler {
exit(1);
}
$progname =~ s|.*/||;
- exec('drakbug', if_($error, '--error', $error), '--incident', $progname,);
+ system('drakbug', if_($error, '--error', $error), '--incident', $progname);
+ c::exit(1);
}
$SIG{SEGV} = sub { bug_handler(@_, 1) };