diff options
Diffstat (limited to 'support/epstopdf')
-rwxr-xr-x | support/epstopdf/epstopdf.pl | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/support/epstopdf/epstopdf.pl b/support/epstopdf/epstopdf.pl index df768ef815..4fa1a59001 100755 --- a/support/epstopdf/epstopdf.pl +++ b/support/epstopdf/epstopdf.pl @@ -1,6 +1,6 @@ #!/usr/bin/env perl use warnings; -# $Id: epstopdf.pl 71121 2024-04-29 17:27:25Z karl $ +# $Id: epstopdf.pl 71777 2024-07-11 21:24:57Z karl $ # (Copyright lines below.) # # Redistribution and use in source and binary forms, with or without @@ -36,7 +36,11 @@ use warnings; # # emacs-page # -my $ver = "2.34"; +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) # * if --debug is first argument, give more output. # * do not check for kpsewhich in PATH unless restricted. @@ -226,7 +230,7 @@ my $ver = "2.34"; ### emacs-page ### program identification my $program = "epstopdf"; -my $ident = '($Id: epstopdf.pl 71121 2024-04-29 17:27:25Z karl $)' . " $ver"; +my $ident = '($Id: epstopdf.pl 71777 2024-07-11 21:24:57Z karl $)' . " $ver"; my $copyright = <<END_COPYRIGHT ; Copyright 2009-2024 Karl Berry et al. Copyright 2002-2009 Gerben Wierda et al. @@ -258,7 +262,7 @@ debug " on_cygwin=$on_cygwin, on_msys=$on_msys"; # 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) { |