Update VPIT::TestHelpers to 15e8aee3

[perl/modules/IPC-MorseSignals.git] / t / 10-sigusr.t

diff --git a/t/10-sigusr.t b/t/10-sigusr.t
index bfe2dc29ed9f56d198b1265c9a9a958ad89bf151..cb3f2d44363345940f60cd372255771a3d76f95b 100644 (file)
--- a/t/10-sigusr.t
+++ b/t/10-sigusr.t
@@ -3,9 +3,9 @@
 use strict;
 use warnings;
 
-use Test::More tests => 2;
+use Test::More tests => 4;
 
-use POSIX qw/SIGUSR1 SIGUSR2/;
+use POSIX qw<SIGUSR1 SIGUSR2>;
 
 my ($a, $b) = (0, 0);
 
@@ -13,7 +13,9 @@ local $SIG{'USR1'} = sub { ++$a };
 local $SIG{'USR2'} = sub { ++$b };
 
 kill SIGUSR1 => $$;
-ok(($a == 1) && ($b == 0), 'SIGUSR1');
+is($a, 1, 'SIGUSR1 triggers $SIG{USR1}');
+is($b, 0, 'SIGUSR1 doesn\'t trigger $SIG{USR2}');
 
 kill SIGUSR2 => $$;
-ok(($a == 1) && ($b == 1), 'SIGUSR2');
+is($a, 1, 'SIGUSR2 doesn\'t trigger $SIG{USR1}');
+is($b, 1, 'SIGUSR2 triggers $SIG{USR2}');