From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sun, 10 Aug 2003 17:33:12 +0000 (+0000)
Subject: One more PL_csighandlerp.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b4ed63f0a0813bfb6f592229a3dc3cac2ade92c3;p=p5sagit%2Fp5-mst-13.2.git

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
--- 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.) */