summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-11-16 04:48:16 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-11-16 04:48:16 +0000
commitd7ceb7fc1159206a67f149394fc7aa55f6b4f7dd (patch)
treef6a6619d3ecf0674bdefc96d205135f75dcf45f4
parent4038bebf1e10fe7b46c1e36dbec84ce8b696de6b (diff)
downloadperl-d7ceb7fc1159206a67f149394fc7aa55f6b4f7dd.tar.gz
Avoid redefinedness warning for now.
p4raw-id: //depot/perl@13040
-rw-r--r--lib/Thread.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Thread.pm b/lib/Thread.pm
index d3e27e1661..c6489541bb 100644
--- a/lib/Thread.pm
+++ b/lib/Thread.pm
@@ -316,7 +316,8 @@ BEGIN {
no strict 'refs';
*{"Thread::$m"} = \&{"threads::shared::${m}_enabled"};
}
- unimplement(qw(list done eval flags));
+ # trying to unimplement eval gives redefined warning
+ unimplement(qw(list done flags));
} elsif ($othreads) {
XSLoader::load 'Thread';
unimplement(qw(unlock));