diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-28 21:44:06 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-28 21:44:06 +0000 |
commit | 3253b43b0591bebee9032edaaf8ca10a35d99eed (patch) | |
tree | 17303dfa486bf49c788be3654b3c01dfa240cae6 /t/lib | |
parent | 422a9acaa4c79cfd0335a1773bae65bb1b7f2902 (diff) | |
download | perl-3253b43b0591bebee9032edaaf8ca10a35d99eed.tar.gz |
Some shells seemingly arrange the signal handlers differently
(bug id 20010521.004).
p4raw-id: //depot/perl@10270
Diffstat (limited to 't/lib')
-rw-r--r-- | t/lib/sigaction.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/sigaction.t b/t/lib/sigaction.t index 8b0a907e44..1815b19510 100644 --- a/t/lib/sigaction.t +++ b/t/lib/sigaction.t @@ -44,7 +44,7 @@ my $oldaction=POSIX::SigAction->new('::bar', new POSIX::SigSet(), 0); } if($oldaction->{HANDLER} eq 'DEFAULT' || - (! -t STDIN && $oldaction->{HANDLER} eq 'IGNORE')) + $oldaction->{HANDLER} eq 'IGNORE') { print "ok 2\n" } else { print "not ok 2 # ", $oldaction->{HANDLER}, "\n"} print $SIG{HUP} eq '::foo' ? "ok 3\n" : "not ok 3\n"; |