diff options
author | Tony Cook <tony@develop-help.com> | 2010-08-31 00:34:19 +1000 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2010-08-31 00:34:19 +1000 |
commit | 17cffb3718693d45499c002f0f50df9196858f28 (patch) | |
tree | bf386dae7feb0ee0b4f0cd50286393e3ca861146 /ext/POSIX/POSIX.xs | |
parent | 8df6b97c1de8326d50ac9c8cae4bf716393b45bb (diff) | |
download | perl-17cffb3718693d45499c002f0f50df9196858f28.tar.gz |
rt77432: sigaction would crash/assert with a replaced %SIG
Diffstat (limited to 'ext/POSIX/POSIX.xs')
-rw-r--r-- | ext/POSIX/POSIX.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index 7bdd6339b7..2b9af9501a 100644 --- a/ext/POSIX/POSIX.xs +++ b/ext/POSIX/POSIX.xs @@ -1471,7 +1471,7 @@ sigaction(sig, optaction, oldaction = 0) right settings, including appropriate interpretation of DEFAULT and IGNORE. However, why are we doing this when we're about to do it again just below? XXX */ - mg_set(*sigsvp); + SvSETMAGIC(*sigsvp); /* And here again we duplicate -- DEFAULT/IGNORE checking. */ if(SvPOK(*svp)) { |