Change 19982 by [EMAIL PROTECTED] on 2003/07/04 10:45:05
No energy knows to figure out what is wrong with $0
(or ps) in Tru64. The test works fine when run from
command line.
Affected files ...
... //depot/perl/ext/threads/t/join.t#13 edit
Differences ...
==== //depot/perl/ext/threads/t/join.t#13 (text) ====
Index: perl/ext/threads/t/join.t
--- perl/ext/threads/t/join.t#12~19977~ Thu Jul 3 21:56:41 2003
+++ perl/ext/threads/t/join.t Fri Jul 4 03:45:05 2003
@@ -92,7 +92,7 @@
}
# We parse ps output so this is OS-dependent.
-if ($^O =~ /^(linux|dec_osf)$/) {
+if ($^O eq 'linux') {
# First modify $0 in a subthread.
print "# mainthread: \$0 = $0\n";
threads->new( sub {
End of Patch.
