diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-19 14:51:35 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-19 14:51:35 +0000 |
commit | 7df63d97d2b58f83e0607cbb2c4871d0e58174f2 (patch) | |
tree | d6e62723f9775f4aeebdb096502262624ab8544e /perl-install | |
parent | 86a73f896ccdd7e2fe1ab457ff81d7085ab39772 (diff) | |
download | drakx-7df63d97d2b58f83e0607cbb2c4871d0e58174f2.tar drakx-7df63d97d2b58f83e0607cbb2c4871d0e58174f2.tar.gz drakx-7df63d97d2b58f83e0607cbb2c4871d0e58174f2.tar.bz2 drakx-7df63d97d2b58f83e0607cbb2c4871d0e58174f2.tar.xz drakx-7df63d97d2b58f83e0607cbb2c4871d0e58174f2.zip |
no_comment
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/pkgs.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index 19c60f0ed..4744e924c 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -943,7 +943,7 @@ sub install($$$;$$) { $error_msg and die $error_msg; } else { #- child process will run each transaction. - $SIG{SEGV} = sub { print OUTPUT "die:crashed\n"; c::_exit(0) }; + $SIG{SEGV} = sub { log::l("segmentation fault on transactions"); c::_exit(0) }; eval { close INPUT; select((select(OUTPUT), $| = 1)[0]); |