summaryrefslogtreecommitdiff
path: root/Master/install-tl.pl
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-01-10 11:01:16 +0000
committerNorbert Preining <preining@logic.at>2008-01-10 11:01:16 +0000
commit291c88afbe2b27948e4eea55680e7643428719a6 (patch)
tree23aa4bb83295d47dc1fde4c9eebdf74d9b9f4ec6 /Master/install-tl.pl
parent5ab926badb5ad24f8b4b994ad5f18f0d2b3a6953 (diff)
close logfile at the end
git-svn-id: svn://tug.org/texlive/trunk@6177 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl.pl')
-rwxr-xr-xMaster/install-tl.pl7
1 files changed, 6 insertions, 1 deletions
diff --git a/Master/install-tl.pl b/Master/install-tl.pl
index 1a18e5b0a8e..9ebd7078066 100755
--- a/Master/install-tl.pl
+++ b/Master/install-tl.pl
@@ -269,6 +269,11 @@ if (-r "$vars{'TEXDIR'}/$InfraLocation/texlive.profile") {
tllog($::LOG_DEBUG, "Profile written to $vars{'TEXDIR'}/$InfraLocation/texlive.profile\n");
}
+
+# Close log file if present
+close($::LOGFILE) if defined($::LOGFILE);
+
+
exit(0);
@@ -286,7 +291,7 @@ sub dump_vars {
print VARS "$key $vars{$key}\n";
}
close VARS;
- print "\n%vars dumped to '$filename'.\n";
+ tllog($::LOG_DEBUG, "\n%vars dumped to '$filename'.\n");
}