diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-04 23:07:39 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-04 23:07:39 +0000 |
commit | faf89a90b9d9ca73fe8e05bd84a30e7989fb5351 (patch) | |
tree | 53585846afb977c989a8c6512e4acc5765d03ae4 /t | |
parent | d91d68c10c209afd8c4afd24673b7e49effc1e4b (diff) | |
download | perl-faf89a90b9d9ca73fe8e05bd84a30e7989fb5351.tar.gz |
test tweak
p4raw-id: //depot/perl@3577
Diffstat (limited to 't')
-rwxr-xr-x | t/io/openpid.t | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/t/io/openpid.t b/t/io/openpid.t index 2d3ac9f32f..334bc0d65b 100755 --- a/t/io/openpid.t +++ b/t/io/openpid.t @@ -1,4 +1,3 @@ - #!./perl ##################################################################### @@ -55,7 +54,7 @@ chomp($from_pid1 = scalar(<FH1>)); print "# child1 returned [$from_pid1]\nnot " unless $from_pid1 eq 'first process'; print "ok 5\n"; -$kill_cnt = kill STOP, $pid1; +$kill_cnt = kill 'HUP', $pid1; print "not " unless $kill_cnt == 1; print "ok 6\n"; @@ -64,7 +63,7 @@ chomp($from_pid2 = scalar(<FH2>)); print "# child2 returned [$from_pid2]\nnot " unless $from_pid2 eq 'second process'; print "ok 7\n"; -$kill_cnt = kill STOP, $pid2, $pid3; +$kill_cnt = kill 'HUP', $pid2, $pid3; print "not " unless $kill_cnt == 2; print "ok 8\n"; |