Tweaked a tweak from H.Merijn Brand on the sigaction test.

p4raw-id: //depot/perl@9153

diff --git a/t/lib/sigaction.t b/t/lib/sigaction.t
index 4c9c95c..8200a6f 100644 (file)
--- a/t/lib/sigaction.t
+++ b/t/lib/sigaction.t
@@ -43,7 +43,8 @@ my $oldaction=POSIX::SigAction->new('::bar', new POSIX::SigSet(), 0);
        if($bad) { print "not ok 1\n" } else { print "ok 1\n"}
 }
 
-if($oldaction->{HANDLER} eq (-t STDIN ? 'DEFAULT' : 'IGNORE'))
+if((-t STDIN && $oldaction->{HANDLER} eq 'IGNORE') ||
+   $oldaction->{HANDLER} eq 'DEFAULT')
   { print "ok 2\n" } else { print "not ok 2\n"}
 print $SIG{HUP} eq '::foo' ? "ok 3\n" : "not ok 3\n";