[java2perl6] r101 committed - Added trace of full command when javap invocation failes

[email protected] Mon, 05 Oct 2009 14:40:18 +0000
Newsgroups perl.dbdi.dev
Message-ID <[email protected]>
Revision: 101
Author: cosimo.streppone
Date: Mon Oct  5 07:39:49 2009
Log: Added trace of full command when javap invocation failes
http://code.google.com/p/java2perl6/source/detail?r=101

Modified:
  /trunk/lib/Java/Javap.pm

=======================================
--- /trunk/lib/Java/Javap.pm	Sun Oct  4 06:34:16 2009
+++ /trunk/lib/Java/Javap.pm	Mon Oct  5 07:39:49 2009
@@ -58,7 +58,7 @@
  	$options ||= {};

  	open(my $javap_fh, '-|', $JAVAP_EXECUTABLE, %$options, @$classes)
-		or croak "Couldn't open $JAVAP_EXECUTABLE subprocess: $!";
+		or croak "'$JAVAP_EXECUTABLE @{[ %$options ]} @$classes' failed: $!";

  	my $javap_output = q{};
  	while (<$javap_fh>) {