From: Nicholas Clark <nick@ccl4.org>
Date: Mon, 18 Dec 2006 00:27:43 +0000 (+0000)
Subject: POSIX::SigAction::new can be moved into the AUTOLOAD section.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fc8b6fe205ed92b06e98c1a558c82355dbefc067;p=p5sagit%2Fp5-mst-13.2.git

POSIX::SigAction::new can be moved into the AUTOLOAD section.

p4raw-id: //depot/perl@29571
---

diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm
index 617d999..a63ff15 100644
--- a/ext/POSIX/POSIX.pm
+++ b/ext/POSIX/POSIX.pm
@@ -59,7 +59,6 @@ sub AUTOLOAD {
 package POSIX::SigAction;
 
 use AutoLoader 'AUTOLOAD';
-sub new { bless {HANDLER => $_[1], MASK => $_[2], FLAGS => $_[3] || 0, SAFE => 0}, $_[0] }
 
 package POSIX::SigRt;
 
@@ -1036,6 +1035,7 @@ require Exporter;
 
 package POSIX::SigAction;
 
+sub new { bless {HANDLER => $_[1], MASK => $_[2], FLAGS => $_[3] || 0, SAFE => 0}, $_[0] }
 sub handler { $_[0]->{HANDLER} = $_[1] if @_ > 1; $_[0]->{HANDLER} };
 sub mask    { $_[0]->{MASK}    = $_[1] if @_ > 1; $_[0]->{MASK} };
 sub flags   { $_[0]->{FLAGS}   = $_[1] if @_ > 1; $_[0]->{FLAGS} };