texlive[71584] Build/extra/epstopdf/epstopdf.pl: os2 => path_sep is ;

[commits+karl at tug.org]

Revision: 71584
          https://tug.org/svn/texlive?view=revision&revision=71584
Author:   karl
Date:     2024-06-22 00:40:28 +0200 (Sat, 22 Jun 2024)
Log Message:
-----------
os2 => path_sep is ;

Modified Paths:
--------------
    trunk/Build/extra/epstopdf/epstopdf.pl

Modified: trunk/Build/extra/epstopdf/epstopdf.pl
===================================================================
--- trunk/Build/extra/epstopdf/epstopdf.pl	2024-06-21 21:33:21 UTC (rev 71583)
+++ trunk/Build/extra/epstopdf/epstopdf.pl	2024-06-21 22:40:28 UTC (rev 71584)
@@ -36,7 +36,9 @@
 #
 # emacs-page
 #
-my $ver = "2.34";
+my $ver = "2.35";
+#  2024/06/21 2.35 (Karl Berry)
+#    * path_sep for OS/2 is also ";".
 #  2024/04/29 2.34 (Karl Berry)
 #    * if --debug is first argument, give more output.
 #    * do not check for kpsewhich in PATH unless restricted.
@@ -258,7 +260,7 @@
 
 # Split PATH and use / as directory separator.
 #
-my $path_sep = ( ($^O =~ /^MSWin/) ? ';' : ':' ); # not msys
+my $path_sep = ($^O =~ /^(OS2|MSWin)i/) ? ';' : ':'; # not msys
 my @pdirs = split($path_sep, $ENV{"PATH"});
 # Normalize directory separators to /. Always valid on Windows.
 if ($on_windows_or_cygwin) {