wok-undigest annotate perl/stuff/miniperlmain.patch @ rev 749

zoneminder: update bdeps
author Pascal Bellard <pascal.bellard@slitaz.org>
date Wed Jul 11 18:14:39 2012 +0200 (2012-07-11)
parents
children
rev   line source
pascal@533 1 --- miniperlmain.c.orig
pascal@533 2 +++ miniperlmain.c
pascal@533 3 @@ -117,13 +117,6 @@
pascal@533 4 if (!exitstatus)
pascal@533 5 perl_run(my_perl);
pascal@533 6
pascal@533 7 - /* Unregister our signal handler before destroying my_perl */
pascal@533 8 - for (i = 0; PL_sig_name[i]; i++) {
pascal@533 9 - if (rsignal_state(PL_sig_num[i]) == (Sighandler_t) PL_csighandlerp) {
pascal@533 10 - rsignal(PL_sig_num[i], (Sighandler_t) SIG_DFL);
pascal@533 11 - }
pascal@533 12 - }
pascal@533 13 -
pascal@533 14 exitstatus = perl_destruct(my_perl);
pascal@533 15
pascal@533 16 perl_free(my_perl);