From: Steve Peters <steve@fisharerojo.org>
Date: Thu, 3 Nov 2005 16:00:12 +0000 (+0000)
Subject: Test for the right signal should use the constant for that signal.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=08120247c56b2b8f5624b20a34ff64b763274d95;p=p5sagit%2Fp5-mst-13.2.git

Test for the right signal should use the constant for that signal.

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

diff --git a/ext/POSIX/t/sigaction.t b/ext/POSIX/t/sigaction.t
index 240110b..813960a 100644
--- a/ext/POSIX/t/sigaction.t
+++ b/ext/POSIX/t/sigaction.t
@@ -198,7 +198,7 @@ SKIP: {
     eval 'use POSIX qw(SA_SIGINFO); SA_SIGINFO';
     skip("no SA_SIGINFO", 1) if $@;
     sub hiphup {
-	is($_[1]->{signo}, 1, "SA_SIGINFO got right signal");
+	is($_[1]->{signo}, SIGHUP, "SA_SIGINFO got right signal");
     }
     my $act = POSIX::SigAction->new('hiphup', 0, SA_SIGINFO);
     sigaction(SIGHUP, $act);