diff options
author | Karl Berry <karl@freefriends.org> | 2008-06-09 16:25:02 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2008-06-09 16:25:02 +0000 |
commit | 0f953f75cf3617fe1bd2cdeb5e14030d949e92b8 (patch) | |
tree | fa5f192543807a979ff139f5d1727441904263fd | |
parent | aca25408a71aa50650162ae580179897e1326164 (diff) |
(check_w32): move all special cases here, add
ebong and simpdftex
git-svn-id: svn://tug.org/texlive/trunk@8618 c570f23f-e606-0410-a88d-b1316a301751
-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"); } |