summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/check-duplicated-runfiles
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/bin/check-duplicated-runfiles')
-rwxr-xr-xMaster/tlpkg/bin/check-duplicated-runfiles6
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