diff options
author | Siep Kroonenberg <siepo@cybercomm.nl> | 2008-08-14 13:59:58 +0000 |
---|---|---|
committer | Siep Kroonenberg <siepo@cybercomm.nl> | 2008-08-14 13:59:58 +0000 |
commit | 60bb6b4149fa9fa366ce6373594e14ba1a8e10ff (patch) | |
tree | 4e0658a5b372eae42b8369f67490ee3d27a956a0 /Master/install-tl | |
parent | a777616c8555d9230a3aa3a660f2cf1317fa5fcb (diff) |
install-tl: print name of logfile
git-svn-id: svn://tug.org/texlive/trunk@10347 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/install-tl')
-rwxr-xr-x | Master/install-tl | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/Master/install-tl b/Master/install-tl index a82bdfb9b60..40cc2103ecb 100755 --- a/Master/install-tl +++ b/Master/install-tl @@ -1342,8 +1342,14 @@ sub do_cleanup debug("Profile written to $vars{'TEXDIR'}/$InfraLocation/texlive.profile\n"); } # Close log file if present - close($::LOGFILE) if defined($::LOGFILE); - + close($::LOGFILE) if (defined($::LOGFILE)); + if (defined($::LOGFILENAME) and (-e $::LOGFILENAME)) { + print "Logfile: $::LOGFILENAME\n"; + } elsif (-e "$vars{'TEXDIRW'}/install-tl.log") { + print "Logfile: $vars{'TEXDIRW'}/install-tl.log\n"; + } else { + print "No logfile\n"; + } #print "Don't forget to set TEXMFSYSVAR to ".$vars{'TEXMFSYSVAR'}."!!!\n" #print "Don't forget to set TEXMFCNF to\n ". $vars{'TEXMFSYSVAR'}."/web2c !!!\n" # if ($vars{'from_dvd'} and !win32()); |