texlive[63047]

[commits+karl at tug.org]

Revision: 63047
          http://tug.org/svn/texlive?view=revision&revision=63047
Author:   karl
Date:     2022-04-16 22:25:09 +0200 (Sat, 16 Apr 2022)
Log Message:
-----------
arara (16apr22)

Modified Paths:
--------------
    trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl

Modified: trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl
===================================================================
--- trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl	2022-04-16 20:24:55 UTC (rev 63046)
+++ trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl	2022-04-16 20:25:09 UTC (rev 63047)
@@ -1,5 +1,5 @@
 #!/usr/bin/env perl
-# $Id: tlmgr.pl 63018 2022-04-13 00:49:43Z karl $
+# $Id: tlmgr.pl 63033 2022-04-15 05:19:42Z preining $
 #
 # Copyright 2008-2022 Norbert Preining
 # This file is licensed under the GNU General Public License version 2
@@ -7,8 +7,8 @@
 
 use strict; use warnings;
 
-my $svnrev = '$Revision: 63018 $';
-my $datrev = '$Date: 2022-04-13 02:49:43 +0200 (Wed, 13 Apr 2022) $';
+my $svnrev = '$Revision: 63033 $';
+my $datrev = '$Date: 2022-04-15 07:19:42 +0200 (Fri, 15 Apr 2022) $';
 my $tlmgrrevision;
 my $tlmgrversion;
 my $prg;
@@ -640,9 +640,10 @@
   $packagelogged = 0;  # how many msgs we logged
   $commandslogged = 0;
   chomp (my $texmfsysvar = `kpsewhich -var-value=TEXMFSYSVAR`);
+  chomp (my $texmfvar = `kpsewhich -var-value=TEXMFVAR`);
   $packagelogfile = $opts{"package-logfile"};
   if ($opts{"usermode"}) {
-    $packagelogfile ||= "$::maintree/web2c/tlmgr.log";
+    $packagelogfile ||= "$texmfvar/web2c/tlmgr.log";
   } else {
     $packagelogfile ||= "$texmfsysvar/web2c/tlmgr.log";
   }
@@ -659,7 +660,7 @@
   # output of executed commands are put into -command-logfile
   $commandlogfile = $opts{"command-logfile"};
   if ($opts{"usermode"}) {
-    $commandlogfile ||= "$::maintree/web2c/tlmgr-commands.log";
+    $commandlogfile ||= "$texmfvar/web2c/tlmgr-commands.log";
   } else {
     $commandlogfile ||= "$texmfsysvar/web2c/tlmgr-commands.log";
   }
@@ -9652,7 +9653,7 @@
 =head2 User mode logs
 
 In user mode, C<tlmgr.log> and <tlmgr-commands.log> are written in the 
-C<USERTREE/web2c/> directlry instead of C<TEXMFSYSVAR/web2c/>.
+C<TEXMFVAR/web2c/> directlry instead of C<TEXMFSYSVAR/web2c/>.
 
 =head1 MULTIPLE REPOSITORIES
 
@@ -10239,7 +10240,7 @@
 distribution (L<https://tug.org/texlive>) and both are licensed under the
 GNU General Public License Version 2 or later.
 
-$Id: tlmgr.pl 63018 2022-04-13 00:49:43Z karl $
+$Id: tlmgr.pl 63033 2022-04-15 05:19:42Z preining $
 =cut
 
 # test HTML version: pod2html --cachedir=/tmp tlmgr.pl >/tmp/tlmgr.html