diff options
Diffstat (limited to 'Master/tlpkg/bin/check-duplicated-runfiles')
-rwxr-xr-x | Master/tlpkg/bin/check-duplicated-runfiles | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/Master/tlpkg/bin/check-duplicated-runfiles b/Master/tlpkg/bin/check-duplicated-runfiles index d212c68e589..05a51860283 100755 --- a/Master/tlpkg/bin/check-duplicated-runfiles +++ b/Master/tlpkg/bin/check-duplicated-runfiles @@ -11,7 +11,7 @@ BEGIN { unshift (@INC, "$mydir/.."); } -use TeXLive::TLConfig; +use TeXLive::TLConfig qw/$RelocPrefix $RelocTree/; use TeXLive::TLPOBJ; use TeXLive::TLPDB; @@ -31,7 +31,9 @@ my @runtime_files = (); foreach my $tlpn ($tlpdb->list_packages) { next if ($tlpn =~ /$non_normal/); my $tlp = $tlpdb->get_package($tlpn); - push @runtime_files, $tlp->runfiles; + my @files = $tlp->runfiles; + if ($tlp->relocated) { for (@files) { s:^$RelocPrefix/:$RelocTree/:; } } + push @runtime_files, @files; } # build the duplicates list |