diff options
| -rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 6 |
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; } |