diff options
author | Karl Berry <karl@freefriends.org> | 2016-11-01 17:52:42 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2016-11-01 17:52:42 +0000 |
commit | 89932411328fa7d9375927a54406fa3e5a8dc3da (patch) | |
tree | 97700d0a145fc02a65bf57519b068dc939012667 | |
parent | e679f428bdb13fa73eee30ec52dbddcb53683055 (diff) |
more check excludes; cd away for tlpsrc
git-svn-id: svn://tug.org/texlive/trunk@42414 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-x | Master/tlpkg/bin/check-files-by-format | 3 | ||||
-rwxr-xr-x | Master/tlpkg/bin/tlprm | 4 |
2 files changed, 7 insertions, 0 deletions
diff --git a/Master/tlpkg/bin/check-files-by-format b/Master/tlpkg/bin/check-files-by-format index 0e6be852bd9..c4e33c17230 100755 --- a/Master/tlpkg/bin/check-files-by-format +++ b/Master/tlpkg/bin/check-files-by-format @@ -127,6 +127,8 @@ my $exclude_pfb = { '*base*' => 'texmf-dist/fonts/type1', 'public/mathabx-type1/' => 1, # 14jan11 wrote bnb/preining --karl 'public/mathdesign/mdpus/' => 1,# 3jan16 author informed long ago, no release 'public/mathpazo/' => 1, + 'public/newpx/' => 1, # 21aug16 bluezones not worth fixing + 'public/newtx/' => 1, # 21aug16 bluezones not worth fixing 'public/ocherokee/' => 1, 'public/oinuit/' => 1, 'public/old-arrows/' => 1, # 2015 author unable/unwilling @@ -213,6 +215,7 @@ my $exclude_vf = { '*base*' => 'texmf-dist/fonts/vf', 'public/mathdesign/mdugm/' => 1, 'public/sansmathfonts/' => 2, # 20may13 ok with cmssbx12.tfm from sauter 'public/txfontsb/' => 1, + 'public/uppunctlm/' => 1, 'public/zefonts/' => 1, 'vntex/comicsansvn/' => 1, }; diff --git a/Master/tlpkg/bin/tlprm b/Master/tlpkg/bin/tlprm index 9158e6371b7..4ff9155a251 100755 --- a/Master/tlpkg/bin/tlprm +++ b/Master/tlpkg/bin/tlprm @@ -38,6 +38,10 @@ sub main { my $failure_count = 0; chomp (my $Master = `cd $mydir/../.. && pwd`); + # cd anywhere would do, but if in tlpsrc the .tlpsrc file itself + # is listed incorrectly as directly under Master. + chdir ($Master) || die "chdir($Master) failed: $!"; + my $tlpdb = TeXLive::TLPDB->new ("root" => $Master); foreach my $f (@ARGV) { |