diff options
| author | Karl Berry <karl@freefriends.org> | 2019-07-27 21:07:02 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2019-07-27 21:07:02 +0000 |
| commit | 5d96c68493b94311e6eddd1203bdc037ef466b1e (patch) | |
| tree | e378d59337aa921b779565d7d1d54859b995e9db /Build | |
| parent | 6bef83deb7557e3f77db24324e41b44b69548a5d (diff) | |
authorindex (27jul19)
git-svn-id: svn://tug.org/texlive/trunk@51757 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
| -rwxr-xr-x | Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl b/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl index 9cbc743cc4b..480d1ba0bb7 100755 --- a/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl +++ b/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl @@ -1,12 +1,12 @@ #!/usr/bin/env perl -# $Id: tlmgr.pl 51716 2019-07-24 04:58:04Z preining $ +# $Id: tlmgr.pl 51740 2019-07-26 17:39:35Z karl $ # # Copyright 2008-2019 Norbert Preining # This file is licensed under the GNU General Public License version 2 # or any later version. -my $svnrev = '$Revision: 51716 $'; -my $datrev = '$Date: 2019-07-24 06:58:04 +0200 (Wed, 24 Jul 2019) $'; +my $svnrev = '$Revision: 51740 $'; +my $datrev = '$Date: 2019-07-26 19:39:35 +0200 (Fri, 26 Jul 2019) $'; my $tlmgrrevision; my $tlmgrversion; my $prg; @@ -5458,14 +5458,15 @@ sub check_files { sub check_runfiles { my $Master = $localtlpdb->root; - # build a list of all runtime files associated to 'normal' packages - (my $non_normal = `ls "$Master/bin"`) =~ s/\n/\$|/g; # binaries - $non_normal .= '^0+texlive|^bin-|^collection-|^scheme-|^texlive-|^texworks'; - $non_normal .= '|^pgf$'; # has lots of intentionally duplicated .lua + # build a list of all runtime files associated with normal packages. + (my $omit_pkgs = `ls "$Master/bin"`) =~ s/\n/\$|/g; # binaries + $omit_pkgs .= '^0+texlive|^bin-|^collection-|^scheme-|^texlive-|^texworks'; + $omit_pkgs .= '|^pgf$'; # intentionally duplicated .lua + $omit_pkgs .= '|^latex-.*-dev$'; # intentionally duplicated base latex my @runtime_files = (); # foreach my $tlpn ($localtlpdb->list_packages) { - next if ($tlpn =~ /$non_normal/); + next if $tlpn =~ /$omit_pkgs/; # my $tlp = $localtlpdb->get_package($tlpn); my @files = $tlp->runfiles; @@ -9859,7 +9860,7 @@ This script and its documentation were written for the TeX Live distribution (L<https://tug.org/texlive>) and both are licensed under the GNU General Public License Version 2 or later. -$Id: tlmgr.pl 51716 2019-07-24 04:58:04Z preining $ +$Id: tlmgr.pl 51740 2019-07-26 17:39:35Z karl $ =cut # test HTML version: pod2html --cachedir=/tmp tlmgr.pl >/tmp/tlmgr.html |