summaryrefslogtreecommitdiff
path: root/Build
diff options
context:
space:
mode:
authorHironobu Yamashita <h.y.acetaminophen@gmail.com>2022-09-19 02:42:50 +0000
committerHironobu Yamashita <h.y.acetaminophen@gmail.com>2022-09-19 02:42:50 +0000
commita30fd9d2f555f24b7b7aec4763d415753c417748 (patch)
treec84accd012f5388aeba77a544c8b435083cfbd93 /Build
parent7b8fea3ec7c64cf8112a26661d0dc9717c3ef0e2 (diff)
epstopdf.pl: sync with Build/extra/epstopdf/epstopdf.pl
git-svn-id: svn://tug.org/texlive/trunk@64439 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
-rwxr-xr-xBuild/source/texk/texlive/linked_scripts/epstopdf/epstopdf.pl12
1 files changed, 7 insertions, 5 deletions
diff --git a/Build/source/texk/texlive/linked_scripts/epstopdf/epstopdf.pl b/Build/source/texk/texlive/linked_scripts/epstopdf/epstopdf.pl
index a84ec10097f..c4003e25c1f 100755
--- a/Build/source/texk/texlive/linked_scripts/epstopdf/epstopdf.pl
+++ b/Build/source/texk/texlive/linked_scripts/epstopdf/epstopdf.pl
@@ -1,5 +1,5 @@
#!/usr/bin/env perl
-# $Id: epstopdf.pl 64235 2022-08-29 22:52:01Z karl $
+# $Id: epstopdf.pl 64317 2022-09-08 01:25:27Z karl $
# (Copyright lines below.)
#
# Redistribution and use in source and binary forms, with or without
@@ -37,9 +37,11 @@
#
my $ver = "2.30";
# 2022/09/05 v2.30 (Siep Kroonenberg)
+# * still use gswin32c if gswin64c.exe not on PATH.
# 2022/08/29 v2.29 (Karl Berry)
+# * use gswin64c.exe on 64-bit Windows.
# 2018/09/17 v2.28 (Karl Berry)
-# * use gswin64c on 64-bit Windows.
+# * -dCompatibilityLevel=1.5 by default, since gs9.25 switched to 1.7.
# 2017/09/14 v2.27 (Karl Berry)
# * extract value from --gsopt with $3 not $2 (extra regexp group
# added previously), and check it with ^(...)$ so anchors apply to all.
@@ -191,7 +193,7 @@ my $ver = "2.30";
### emacs-page
### program identification
my $program = "epstopdf";
-my $ident = '($Id: epstopdf.pl 64235 2022-08-29 22:52:01Z karl $)' . " $ver";
+my $ident = '($Id: epstopdf.pl 64317 2022-09-08 01:25:27Z karl $)' . " $ver";
my $copyright = <<END_COPYRIGHT ;
Copyright 2009-2022 Karl Berry et al.
Copyright 2002-2009 Gerben Wierda et al.
@@ -211,8 +213,8 @@ if ($on_windows) {
$GS = "gswin32c";
if ($ENV{"PROCESSOR_ARCHITECTURE"} eq "AMD64"
|| $ENV{"PROCESSOR_ARCHITEW6432"} eq "AMD64") {
- # prefer gswin64c.exe if on searchpath
- my @pdirs = split( /;/, $ENV{"PATH"});
+ # prefer gswin64c.exe if on search path.
+ my @pdirs = split(/;/, $ENV{"PATH"});
foreach $d (@pdirs) {
$d = substr ($d, 1, -1) if (substr ($d,1,1) eq '"');
if (-f $d . "/gswin64c.exe") {