diff options
author | Karl Berry <karl@freefriends.org> | 2023-09-16 20:14:37 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2023-09-16 20:14:37 +0000 |
commit | 5587509f50959468790edb6e7c179333a52a6142 (patch) | |
tree | d2a2b5c53629df46d1167f857d386938c03ec0b6 /Build/source/texk | |
parent | e4039185bacfb078a628973b5e8437a484cfc87c (diff) |
epstopdf (16sep23)
git-svn-id: svn://tug.org/texlive/trunk@68301 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk')
-rwxr-xr-x | Build/source/texk/texlive/linked_scripts/epstopdf/epstopdf.pl | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/Build/source/texk/texlive/linked_scripts/epstopdf/epstopdf.pl b/Build/source/texk/texlive/linked_scripts/epstopdf/epstopdf.pl index d6bf66b2d8d..6409ea2398d 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 67585 2023-07-08 21:10:52Z karl $ +# $Id: epstopdf.pl 68289 2023-09-15 22:17:54Z karl $ # (Copyright lines below.) # # Redistribution and use in source and binary forms, with or without @@ -35,7 +35,10 @@ # # emacs-page # -my $ver = "2.32"; +my $ver = "2.33"; +# 2023/09/15 2.33 (Karl Berry) +# * Cygwin PATH separator is :. Report from Alois Steindl, +# https://tug.org/pipermail/tex-live/2023-September/049474.html # 2023/07/08 2.32 (Karl Berry) # * check that kpsewhich and gs are in PATH. # * correct TL path for kpsewhich to bin/windows. @@ -200,7 +203,7 @@ my $ver = "2.32"; ### emacs-page ### program identification my $program = "epstopdf"; -my $ident = '($Id: epstopdf.pl 67585 2023-07-08 21:10:52Z karl $)' . " $ver"; +my $ident = '($Id: epstopdf.pl 68289 2023-09-15 22:17:54Z karl $)' . " $ver"; my $copyright = <<END_COPYRIGHT ; Copyright 2009-2023 Karl Berry et al. Copyright 2002-2009 Gerben Wierda et al. @@ -542,7 +545,7 @@ sub check_prog_exists { } # not absolute, check path - for my $dir (split ($on_windows_or_cygwin ? ";" : ":", $ENV{"PATH"})) { + for my $dir (split ($on_windows ? ";" : ":", $ENV{"PATH"})) { $dir = "." if $dir eq ""; # empty path element debug " Checking dir $dir"; if (-x "$dir/$prog") { |