texlive[71777] Build/extra/epstopdf/epstopdf.pl: epstopdf 2.36:

[commits+karl at tug.org]

Revision: 71777
          https://tug.org/svn/texlive?view=revision&revision=71777
Author:   karl
Date:     2024-07-11 23:24:57 +0200 (Thu, 11 Jul 2024)
Log Message:
-----------
epstopdf 2.36: regexp syntax.

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

Modified: trunk/Build/extra/epstopdf/epstopdf.pl
===================================================================
--- trunk/Build/extra/epstopdf/epstopdf.pl	2024-07-11 19:58:01 UTC (rev 71776)
+++ trunk/Build/extra/epstopdf/epstopdf.pl	2024-07-11 21:24:57 UTC (rev 71777)
@@ -36,7 +36,9 @@
 #
 # emacs-page
 #
-my $ver = "2.35";
+my $ver = "2.36";
+#  2024/07/11 2.36 (Karl Berry)
+#    * regexp syntax for OS/2 test, found by John Collins.
 #  2024/06/21 2.35 (Karl Berry)
 #    * path_sep for OS/2 is also ";".
 #  2024/04/29 2.34 (Karl Berry)
@@ -260,7 +262,7 @@
 
 # Split PATH and use / as directory separator.
 #
-my $path_sep = ($^O =~ /^(OS2|MSWin)i/) ? ';' : ':'; # 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) {