[libinline-java-perl] 108/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 654b252cb988ba9ff30151e4002ae9d05d6df7cc
Author: Patrick LeBoutillier <patl at cpan.org>
Date:   Mon Aug 27 17:18:13 2001 +0000

    *** empty log message ***
---
 Java.pod    |  2 +-
 Makefile.PL | 21 ++++++++++++++++++++-
 2 files changed, 21 insertions(+), 2 deletions(-)

diff --git a/Java.pod b/Java.pod
index e1b3991..280eb88 100644
--- a/Java.pod
+++ b/Java.pod
@@ -561,7 +561,7 @@ focus for future releases. It has been tested on:
    - Solaris 2.8            + Perl 5.6 + Java SDK 1.3.0
    - Linux Redhat 6.2 Alpha + Perl 5.6 + Java SDK 1.3.1
    - Windows 2000           + Perl 5.6 + Java SDK 1.3.0
-   - Windows 95             + Perl 5.6 + Java SDK 1.2.2 (fix required in Makefile)
+   - Windows 95             + Perl 5.6 + Java SDK 1.2.2 (use 'fix' option) 
 
 It likely will work with many other configurations.
 
diff --git a/Makefile.PL b/Makefile.PL
index 315de86..1faeb64 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -9,6 +9,7 @@ $main::JNI_BUILD = 0 ;
 rename("Java/JNI.xs_", "Java/JNI.xs") ;
 
 
+my $fix_makefile = 0 ;
 foreach my $arg (@ARGV){
 	my $a = $arg ;
 	$a =~ s/^\s+// ;
@@ -16,7 +17,9 @@ foreach my $arg (@ARGV){
 
 	if ($a =~ /^JNI$/i){
 		$JNI_BUILD = 1 ;
-		last ;
+	}
+	elsif ($a =~ /^FIX$/i){
+		$fix_makefile = 1 ;
 	}
 }
 
@@ -29,3 +32,19 @@ WriteMakefile(
 	},
 	clean => {FILES => '_Inline_test/'},
 ) ;
+
+
+if ($fix_makefile){
+	print "\nFixing Makefile for Win32...\n" ;
+	open(MAKEFILE, "<Makefile") or die "Can't open Makefile for reading" ;
+	my @lines = <MAKEFILE> ;
+	close(MAKEFILE) ;
+	open(MAKEFILE, ">Makefile") or die "Can't open Makefile for writing" ;
+	foreach my $line (@lines){
+		if ($line !~ /^\s*((\@\[)|(\]))\s*$/){
+			print MAKEFILE $line ;
+		}
+	}
+	close(MAKEFILE) ;
+}
+

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