diff options
| author | Chip Salzenberg <chip@pobox.com> | 2012-06-21 15:51:33 -0700 |
|---|---|---|
| committer | Chip Salzenberg <chip@pobox.com> | 2012-06-22 15:04:10 -0700 |
| commit | 724be0c90ff128295fdb35f55a2c881377e80372 (patch) | |
| tree | 03ad5fa57102cde275a84186f1d425f7da32b384 /miniperlmain.c | |
| parent | 3565fbf321fb95d8363f9fd24673f1f135265f89 (diff) | |
| download | perl-724be0c90ff128295fdb35f55a2c881377e80372.tar.gz | |
do not try to restore state of pseudosignal zero
Diffstat (limited to 'miniperlmain.c')
| -rw-r--r-- | miniperlmain.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/miniperlmain.c b/miniperlmain.c index 461997c3e5..12b2f60daa 100644 --- a/miniperlmain.c +++ b/miniperlmain.c @@ -120,7 +120,7 @@ main(int argc, char **argv, char **env) #ifndef PERL_MICRO /* Unregister our signal handler before destroying my_perl */ - for (i = 0; PL_sig_name[i]; i++) { + for (i = 1; PL_sig_name[i]; i++) { if (rsignal_state(PL_sig_num[i]) == (Sighandler_t) PL_csighandlerp) { rsignal(PL_sig_num[i], (Sighandler_t) SIG_DFL); } |