[libinline-java-perl] 69/398: *** empty log message ***

[Jonas Smedegaard]

This is an automated email from the git hooks/post-receive script.

js pushed a commit to tag 0.55
in repository libinline-java-perl.

commit 57b772214dcc54322d9d197c97082edf09ec6c86
Author: patrick <>
Date:   Fri Apr 20 13:58:22 2001 +0000

    *** empty log message ***
---
 Java.pm     | 11 +++++++----
 Java/JVM.pm |  2 +-
 2 files changed, 8 insertions(+), 5 deletions(-)

diff --git a/Java.pm b/Java.pm
index 5873100..9d75948 100644
--- a/Java.pm
+++ b/Java.pm
@@ -99,7 +99,7 @@ END {
 }
 
 
-# Signal stuff, not really needed with USE_JNI
+# Signal stuff, not really needed with JNI
 use sigtrap 'handler', \&done, 'normal-signals' ;
 
 $SIG{__DIE__} = sub {
@@ -155,6 +155,9 @@ sub _validate {
 	if (! exists($o->{Java}->{DEBUG})){
 		$o->{Java}->{DEBUG} = 0 ;
 	}
+	if (! exists($o->{Java}->{JNI})){
+		$o->{Java}->{JNI} = 0 ;
+	}
 	if (! exists($o->{Java}->{CLASSPATH})){
 		$o->{Java}->{CLASSPATH} = '' ;
 	}
@@ -189,7 +192,7 @@ sub _validate {
 			$o->{Java}->{$key} = $value ;
 			$Inline::Java::DEBUG = $value ;
 		}
-		elsif ($key eq 'USE_JNI'){
+		elsif ($key eq 'JNI'){
 			$o->{Java}->{$key} = $value ;
 		}
 		else{
@@ -199,8 +202,8 @@ sub _validate {
 		}
 	}
 
-	if ($ENV{PERL_INLINE_JAVA_USE_JNI}){
-		$o->{Java}->{USE_JNI} = 1 ;
+	if (defined($ENV{PERL_INLINE_JAVA_JNI})){
+		$o->{Java}->{JNI} = $ENV{PERL_INLINE_JAVA_JNI} ;
 	}
 
 	my $install_lib = $o->{install_lib} ;
diff --git a/Java/JVM.pm b/Java/JVM.pm
index f67c285..65e3de2 100644
--- a/Java/JVM.pm
+++ b/Java/JVM.pm
@@ -20,7 +20,7 @@ sub new {
 
 	Inline::Java::debug("Starting JVM...") ;
 
-	if ($o->{Java}->{USE_JNI}){
+	if ($o->{Java}->{JNI}){
 		Inline::Java::debug("  JNI mode") ;
 
 		require Inline::Java::JNI ;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libinline-java-perl.git