diff options
| -rwxr-xr-x | Master/tlpkg/bin/check-wrapper-consistency | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/Master/tlpkg/bin/check-wrapper-consistency b/Master/tlpkg/bin/check-wrapper-consistency index 3a0b4afe573..97c566a6721 100755 --- a/Master/tlpkg/bin/check-wrapper-consistency +++ b/Master/tlpkg/bin/check-wrapper-consistency @@ -74,8 +74,6 @@ sub unx_wrapper_entries my $target = readlink ($ent); die "readlink($ent) failed: $!" if !defined ($target); next unless $target =~ /^\.\./; # skip all but .. symlinks - next if $target =~ /ps4pdf/; # has its own .bat, sorry for special case - next if $target =~ /dviasm/; # has no .bat, sorry for special case # the target of the symlink should be executable. warn "$ent: target $target not executable\n" if ! -x $target; @@ -101,8 +99,11 @@ sub check_w32 for my $k (sort keys %uw) { #print "$k -> $uw{$k}\n"; - # the tex4ht entries are real .bat scripts on Windows. - next if $uw{$k} =~ /tex4ht/; + my $target = $uw{$k}; + next if $target =~ /tex4ht/; # tex4ht elements have their own .bat's + next if $target =~ /ps4pdf/; # has its own .bat + next if $target =~ /dviasm|ebong/; # no .bat for python + next if $target =~ /simpdftex/; # shell script $diff += system ("cmp $w32dir/$k.bat $w32canonical"); } |