diff options
Diffstat (limited to 'Master/tlpkg/bin/tlpsrc2tlpdb')
-rwxr-xr-x | Master/tlpkg/bin/tlpsrc2tlpdb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Master/tlpkg/bin/tlpsrc2tlpdb b/Master/tlpkg/bin/tlpsrc2tlpdb index 629f692cae7..686bab6bd9b 100755 --- a/Master/tlpkg/bin/tlpsrc2tlpdb +++ b/Master/tlpkg/bin/tlpsrc2tlpdb @@ -14,6 +14,7 @@ BEGIN { use strict; +use TeXLive::TLConfig; use TeXLive::TLPSRC; use TeXLive::TLPOBJ; use TeXLive::TLPDB; @@ -94,7 +95,7 @@ sub main # write the new db, to the real location given --all, or stdout. if ($opt_all) { local *TLPDB; - our $TLPDB = ">$opt_master/texlive.tlpdb"; + our $TLPDB = ">$opt_master/$TeXLive::TLConfig::InfraLocation/texlive.tlpdb"; open (TLPDB) || die "open($TLPDB) failed: $!"; $tldb->writeout (*TLPDB); warn "$0: wrote $src_count packages $TLPDB.\n"; |