diff options
| author | Artur Bergman <sky@nanisky.com> | 2001-10-26 12:37:17 +0000 |
|---|---|---|
| committer | Artur Bergman <sky@nanisky.com> | 2001-10-26 12:37:17 +0000 |
| commit | 9ece3ee6650e9c2f6d5131c19ae5e80f2a8bfc4a (patch) | |
| tree | ba29119bb45570f0c8410b9e00f582eb592e93d4 /ext/threads | |
| parent | 8222d950c8d6de1b5e2b0ab47462f5dfd4bdf782 (diff) | |
| download | perl-9ece3ee6650e9c2f6d5131c19ae5e80f2a8bfc4a.tar.gz | |
More Config::threads to threads::threads changes
p4raw-id: //depot/perl@12677
Diffstat (limited to 'ext/threads')
| -rw-r--r-- | ext/threads/shared/shared.pm | 2 | ||||
| -rwxr-xr-x | ext/threads/t/basic.t | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/ext/threads/shared/shared.pm b/ext/threads/shared/shared.pm index d928d26349..d0d6cce30c 100644 --- a/ext/threads/shared/shared.pm +++ b/ext/threads/shared/shared.pm @@ -7,7 +7,7 @@ use Scalar::Util qw(weaken); use attributes qw(reftype); BEGIN { - if($Config{'useithreads'} && $Config::threads) { + if($Config{'useithreads'} && $threads::threads) { *share = \&share_enabled; *cond_wait = \&cond_wait_disabled; *cond_signal = \&cond_signal_disabled; diff --git a/ext/threads/t/basic.t b/ext/threads/t/basic.t index 399b017b44..eca5c97ed2 100755 --- a/ext/threads/t/basic.t +++ b/ext/threads/t/basic.t @@ -69,7 +69,7 @@ threads->create('test3',1)->join(); #check Config -ok(5, 1 == $Config::threads,"Check that Config::threads is true"); +ok(5, 1 == $threads::threads,"Check that threads::threads is true"); #test trying to detach thread |