summaryrefslogtreecommitdiff
path: root/jpl
diff options
context:
space:
mode:
authorJens Thomsen <jens@fiend.cis.com>2000-07-28 09:54:49 -0600
committerJarkko Hietaniemi <jhi@iki.fi>2000-07-30 19:05:48 +0000
commit24142eb29e13a3c1fffe9021ceab90a4be7b9da1 (patch)
tree982ece540b154cd7d24324d797b386d54ddf799b /jpl
parent075321c347d33b08156332124a97d603fca34e0f (diff)
downloadperl-24142eb29e13a3c1fffe9021ceab90a4be7b9da1.tar.gz
Find green threads before native threads.
Subject: Re: Patch to jpl/JNI/Makefile.PL Message-ID: <Pine.LNX.4.21.0007281553470.687-200000@fiend.cis.com> p4raw-id: //depot/perl@6468
Diffstat (limited to 'jpl')
-rw-r--r--jpl/JNI/Makefile.PL7
1 files changed, 4 insertions, 3 deletions
diff --git a/jpl/JNI/Makefile.PL b/jpl/JNI/Makefile.PL
index 1a54b9d82c..754bde68ed 100644
--- a/jpl/JNI/Makefile.PL
+++ b/jpl/JNI/Makefile.PL
@@ -115,11 +115,12 @@ sub find_stuff {
my ($candidates, $locations) = @_;
- my $lib;
+ my ($pos,$lib);
$wanted = sub {
foreach my $name (@$candidates) {
- if (/$name$/ and ! /green_threads/ and !/include-old/) {
- $lib = $File::Find::name;
+ $pos = $File::Find::name;
+ if (/$name$/ && $pos !~ /green_threads/ && $pos !~ /include-old/) {
+ $lib = $pos;
}
}
};