diff options
author | tml <> | 2008-06-06 07:58:07 +0000 |
---|---|---|
committer | tml <> | 2008-06-06 07:58:07 +0000 |
commit | 2092508b1c87b7f8649304891b46611f6d96775f (patch) | |
tree | 81e0bc973feac0c8188c5ebb41441d5c37fd11ed /intltool-update.in | |
parent | f4dea3e947dbf419585b434100837601ecd57c49 (diff) | |
download | intltool-2092508b1c87b7f8649304891b46611f6d96775f.tar.gz |
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.)
Diffstat (limited to 'intltool-update.in')
-rw-r--r-- | intltool-update.in | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/intltool-update.in b/intltool-update.in index 42e2274..b3a8816 100644 --- a/intltool-update.in +++ b/intltool-update.in @@ -627,6 +627,8 @@ sub GenerateHeaders { 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")) |