diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-06-04 14:06:58 +0100 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2009-06-04 14:06:58 +0100 |
commit | c8be058c40ba584eaa1b32e8b2fe754f679df51d (patch) | |
tree | af87caa0fb03c1a2503c73ea6faef3b54a76e857 | |
parent | caa34d58d7583a1eedaf9e469c9d7b16ef06c84d (diff) | |
download | perl-c8be058c40ba584eaa1b32e8b2fe754f679df51d.tar.gz |
Assuming that $SIG{PIPE} is not set can be bogus when running in a cron job.
Use $SIG{KILL} instead, as no-one sane would set an untrappable signal.
This should address failures some smokers are reporting.
-rwxr-xr-x | t/op/magic.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/magic.t b/t/op/magic.t index fd2307bd2e..95459bca69 100755 --- a/t/op/magic.t +++ b/t/op/magic.t @@ -495,7 +495,7 @@ is $SIG{HUNGRY}, undef, "HUNGRY is now gone"; is delete $SIG{HUNGRY}, undef, "HUNGRY remains gone"; # Test deleting signals that we never set -foreach my $sig (qw(__DIE__ _BOGUS_HOOK PIPE THIRSTY)) { +foreach my $sig (qw(__DIE__ _BOGUS_HOOK KILL THIRSTY)) { is $SIG{$sig}, undef, "$sig is not present"; is delete $SIG{$sig}, undef, "delete of $sig returns undef"; } |