diff options
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index 440627c89d0..973c0a608b6 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -3857,13 +3857,19 @@ sub check_runfiles { # 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-'; + $non_normal .= '^0+texlive|^bin-|^collection-|^scheme-|^texlive-|^texworks'; my @runtime_files = (); + # foreach my $tlpn ($localtlpdb->list_packages) { next if ($tlpn =~ /$non_normal/); + # my $tlp = $localtlpdb->get_package($tlpn); my @files = $tlp->runfiles; - if ($tlp->relocated) { for (@files) { s!^$TeXLive::TLConfig::RelocPrefix/!$TeXLive::TLConfig::RelocTree/!; } } + if ($tlp->relocated) { + for (@files) { + s!^$TeXLive::TLConfig::RelocPrefix/!$TeXLive::TLConfig::RelocTree/!; + } + } # special case for koma-script where doc/src files are in runfiles section if ($tlpn eq "koma-script") { @files = grep {!m;^texmf-dist/source/latex/koma-script/;} @files; |