[libinline-java-perl] 27/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 038eb4c399f54c4f3b464fa5a0411fda8ce377e6
Author: patrick <>
Date:   Fri Mar 9 20:27:01 2001 +0000

    *** empty log message ***
---
 Java.pm | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/Java.pm b/Java.pm
index a45ca26..548e71e 100644
--- a/Java.pm
+++ b/Java.pm
@@ -384,16 +384,15 @@ sub write_makefile {
 
 	my $pjavac = portable("RE_FILE", $javac) ;
 	my $pjava = portable("RE_FILE", $java) ;
-	my $predir = portable("IO_REDIR") ;
 
 	print MAKE "class:\n" ;
-	print MAKE "\t$pjavac $modfname.java > cmd.out $predir\n" ;
+	print MAKE "\t\"$pjavac\" $modfname.java\n" ;
 	print MAKE "\n" ;
 	print MAKE "server:\n" ;
-	print MAKE "\t$pjavac InlineJavaServer.java > cmd.out $predir\n" ;
+	print MAKE "\t\"$pjavac\" InlineJavaServer.java\n" ;
 	print MAKE "\n" ;
 	print MAKE "report:\n" ;
-	print MAKE "\t$pjava InlineJavaServer report $debug $modfname *.class > cmd.out $predir\n" ;
+	print MAKE "\t\"$pjava\" InlineJavaServer report $debug $modfname *.class\n" ;
 
 	close(MAKE) ;
 
@@ -428,13 +427,14 @@ sub compile {
 		croak "Can't locate your make binary in your PATH" ;
 	}
 	my $pmake = portable("RE_FILE", "$path/$make") ;
+	my $predir = portable("IO_REDIR") ;
 
 	foreach my $cmd (
-		"$pmake -s class",
+		"\"$pmake\" -s class > cmd.out $predir",
 		["copy_pattern", $build_dir, "*.class", $pinstall, $o->{config}->{UNTAINT} || 0],
-		"$pmake -s server",
+		"\"$pmake\" -s server > cmd.out $predir",
 		["copy_pattern", $build_dir, "*.class", $pinstall, $o->{config}->{UNTAINT} || 0],
-		"$pmake -s report",
+		"\"$pmake\" -s report > cmd.out $predir",
 		["copy_pattern", $build_dir, "*.jdat", $pinstall, $o->{config}->{UNTAINT} || 0],
 		) {
 
@@ -881,7 +881,7 @@ sub portable {
 		PATH_SEP			=>	'/',
 		PATH_SEP_RE			=>	'/',
 		RE_FILE				=>  [],
-		IO_REDIR			=>  '2<&1',
+		IO_REDIR			=>  '2>&1',
 		GOT_ALARM			=>  1,
 	} ;
 
@@ -892,7 +892,7 @@ sub portable {
 			PATH_SEP			=>	'\\',
 			PATH_SEP_RE			=>	'\\\\',
 			RE_FILE				=>  ['/', '\\'],
-			IO_REDIR			=>  '',
+			# IO_REDIR			=>  '',
 			GOT_ALARM			=>  0,
 		}
 	} ;

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