intltool r735 - trunk

[tml svn gnome org]

Author: tml
Date: Fri Jun  6 07:58:07 2008
New Revision: 735
URL: http://svn.gnome.org/viewvc/intltool?rev=735&view=rev

Log:
2008-06-06  Tor Lillqvist  <tml novell com>

	* intltool-update.in (GenerateHeaders): If running under
	ActiveState Perl then prefix the intltool-extract command with the
	Perl interpreter pathname, as the system() function has no clue
	about Unixish executable scripts indicated by just a hashbang
	line.

	(The MSYS Perl, as it runs on a Unix emulator, would be able to
	run executable scripts based on their hashbang lines jus fine, but
	then MSYS Perl doesn't come with XML::Parser. Installing
	XML::Parser for MSYS Perl is somewhat hard. So usually when using
	mingw+MSYS to build GNOMEish software one wants to use
	ActicveState's Perl to run the intltool scripts, even if the
	built-in MSYS Perl is good for other Perl uses.)



Modified:
   trunk/ChangeLog
   trunk/intltool-update.in

Modified: trunk/intltool-update.in
==============================================================================
--- trunk/intltool-update.in	(original)
+++ trunk/intltool-update.in	Fri Jun  6 07:58:07 2008
@@ -627,6 +627,8 @@
 {
     my $EXTRACT = $ENV{"INTLTOOL_EXTRACT"} || "intltool-extract";
 
+    $EXTRACT = "$^X $EXTRACT" if ($^O eq 'MSWin32' && !($EXTRACT =~ /perl/));
+
     ## Generate the .h header files, so we can allow glade and
     ## xml translation support
     if (! isProgramInPath ("$EXTRACT"))