summaryrefslogtreecommitdiff
path: root/Build/source/extra
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2015-01-23 23:23:35 +0000
committerKarl Berry <karl@freefriends.org>2015-01-23 23:23:35 +0000
commit5c3904afe4b24fd740d0eee7d6c7cafe14cd3552 (patch)
tree7a3ff5485b67d2d30f51f24de1c842a0636aeb83 /Build/source/extra
parent649812c53d78c902f637cc6d2f294a6f269cb482 (diff)
epstopdf 2.23: use # instead of = in gs args, to placate msys
git-svn-id: svn://tug.org/texlive/trunk@36128 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/extra')
-rwxr-xr-xBuild/source/extra/epstopdf/epstopdf.pl15
1 files changed, 10 insertions, 5 deletions
diff --git a/Build/source/extra/epstopdf/epstopdf.pl b/Build/source/extra/epstopdf/epstopdf.pl
index b08bc4ff5cb..86fc1744e8e 100755
--- a/Build/source/extra/epstopdf/epstopdf.pl
+++ b/Build/source/extra/epstopdf/epstopdf.pl
@@ -30,13 +30,16 @@
# Level 2 PS interpreter should work, although in practice using
# Ghostscript is near-universal. Many more details below.
#
-# One thing not allowed for: the case of
+# One thing not supported is the case of
# "%%BoundingBox: (atend)" when input is not seekable (e.g., from a pipe),
#
# emacs-page
-my $ver = "2.22";
+my $ver = "2.23";
# History
+# 2015/01/22 v2.23 (Karl Berry)
+# * use # instead of = to placate msys; report from KUROKI Yusuke,
+# tex-k mail 20 Jan 2015 12:40:16.
# 2014/06/18 v2.22 (Karl Berry)
# * escape % in $outputfilename; report from William Fischer,
# tex-k mail 16 Jun 2014 18:45:12.
@@ -179,7 +182,7 @@ There is NO WARRANTY, to the extent permitted by law.
END_COPYRIGHT
my $title = "$program $ident\n";
-my $on_windows = $^O =~ /^MSWin/;
+my $on_windows = $^O =~ /^(MSWin|msys$)";
my $on_windows_or_cygwin = $on_windows || $^O eq "cygwin";
### ghostscript command name
@@ -570,7 +573,8 @@ if ($::opt_pdfsettings
warnerr "Invalid value for --pdfsettings: $::opt_pdfsettings";
$::opt_pdfsettings = '';
}
-push @GS, "-dPDFSETTINGS=/$::opt_pdfsettings" if $::opt_pdfsettings;
+# use # instead of = to avoid mingw path munging.
+push (@GS, "-dPDFSETTINGS#/$::opt_pdfsettings") if $::opt_pdfsettings;
push @GS, qw[
-dMaxSubsetPct=100
@@ -596,7 +600,8 @@ if ($::opt_autorotate and
. "(use 'All', 'None' or 'PageByPage'";
$::opt_autorotate = '';
}
-push @GS, "-dAutoRotatePages=/$::opt_autorotate" if $::opt_autorotate;
+# use # instead of = to avoid mingw path munging.
+push (@GS, "-dAutoRotatePages#/$::opt_autorotate") if $::opt_autorotate;
$rotmsg = $::opt_autorotate ? $::opt_autorotate : "[use gs default]";
foreach my $gsopt (@::opt_gsopt) {