One more PL_csighandlerp.

p4raw-id: //depot/perl@20595

diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs
index 10ba175..d054ce9 100644 (file)
--- a/ext/POSIX/POSIX.xs
+++ b/ext/POSIX/POSIX.xs
@@ -1302,7 +1302,7 @@ sigaction(sig, optaction, oldaction = 0)
                   (BTW, "csighandler" is very different from "sighandler".) */
                svp = hv_fetch(action, "SAFE", 4, FALSE);
                act.sa_handler = (*svp && SvTRUE(*svp))
-                                ? Perl_csighandler : PL_sighandlerp;
+                                ? PL_csighandlerp : PL_sighandlerp;
 
                /* Vector new Perl handler through %SIG.
                   (The core signal handlers read %SIG to dispatch.) */