diff options
Diffstat (limited to 'Master/tlpkg/bin/check-wrapper-consistency')
-rwxr-xr-x | Master/tlpkg/bin/check-wrapper-consistency | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/Master/tlpkg/bin/check-wrapper-consistency b/Master/tlpkg/bin/check-wrapper-consistency index ef1b46b58b4..a2699ecd2c5 100755 --- a/Master/tlpkg/bin/check-wrapper-consistency +++ b/Master/tlpkg/bin/check-wrapper-consistency @@ -84,7 +84,7 @@ sub unx_wrapper_entries -# windows is special, as usual. given the list of wrappers in UW, check +# Windows is special, as usual. Given the list of wrappers in UW, check # that each of those entries exists in W32DIR as a .exe, and is a copy # of the canonical w32 wrapper specified in W32CANONICAL. # @@ -96,6 +96,7 @@ sub check_w32 for my $k (sort keys %uw) { my $target = $uw{$k}; next if $target =~ /context/; # does things its own way + next if $target =~ /listings-ext/; # shell script next if $target =~ /man/; # no symlink next if $target =~ /ps4pdf/; # has its own .bat next if $target =~ /simpdftex/; # shell script @@ -111,9 +112,15 @@ sub check_w32 closedir (DIR) || warn "closedir($DIR) failed: $!"; foreach my $f (@binfiles) { - next if ($f =~ /^tlmgr\.bat$/); # .exe would prevent tlmgr update --self! - next if ($f =~ /^tl-w32-wrapper\.cmd$/); # no .exe stub for the universal wrapper - next unless ($f =~ s/\.(bat|cmd)$/\.exe/); # only if batch file + # .exe would prevent tlmgr update --self! + next if ($f =~ /^tlmgr\.bat$/); + # + # no .exe stub for the universal wrapper: + next if ($f =~ /^tl-w32-wrapper\.cmd$/); + # + # only if batch file: + next unless ($f =~ s/\.(bat|cmd)$/\.exe/); + $diff += system ("cmp $w32dir/$f $w32canonical"); } |