summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-05-07 11:46:41 +0000
committerNorbert Preining <preining@logic.at>2009-05-07 11:46:41 +0000
commit177f67a094d5b9890be9c2ee19fe5ad93ee2d56b (patch)
treef4946a6eb48a81bd64f5e601d9541e3ea7d83c94
parent4f001567777c6055ae8dd8253b2715c813a107ce (diff)
fix for relocatable if there are no files in a package
git-svn-id: svn://tug.org/texlive/branches/branch2009-dev@12980 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/tlpkg/TeXLive/TLPOBJ.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm
index 86b097df993..a4698bc1dae 100644
--- a/Master/tlpkg/TeXLive/TLPOBJ.pm
+++ b/Master/tlpkg/TeXLive/TLPOBJ.pm
@@ -458,6 +458,7 @@ sub cancel_common_texmf_tree {
sub common_texmf_tree {
my $self = shift;
my $tltree;
+ my $dd = 0;
my @files = $self->all_files;
foreach ($self->all_files) {
my $tmp;
@@ -468,6 +469,11 @@ sub common_texmf_tree {
$tltree = $tmp;
}
}
+ # if there are no files then it is by default relocatable, so
+ # return the right tree
+ if (!@files) {
+ $tltree = $RelocTree;
+ }
return $tltree;
}