texlive[61236] Master: use strict; use warnings;
commits+karl at tug.org
commits+karl at tug.org
Mon Dec 6 23:13:25 CET 2021
Revision: 61236
http://tug.org/svn/texlive?view=revision&revision=61236
Author: karl
Date: 2021-12-06 23:13:25 +0100 (Mon, 06 Dec 2021)
Log Message:
-----------
use strict; use warnings;
Modified Paths:
--------------
trunk/Master/install-tl
trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl
Modified: trunk/Master/install-tl
===================================================================
--- trunk/Master/install-tl 2021-12-06 21:24:33 UTC (rev 61235)
+++ trunk/Master/install-tl 2021-12-06 22:13:25 UTC (rev 61236)
@@ -8,6 +8,8 @@
# Be careful when changing wording: *every* normal informational message
# output here must be recognized by the long grep in tl-update-tlnet.
+use strict; use warnings;
+
my $svnrev = '$Revision$';
$svnrev =~ m/: ([0-9]+) /;
$::installerrevision = ($1 ? $1 : 'unknown');
@@ -204,8 +206,6 @@
));
}
-use strict;
-
# global list of lines that get logged (see TLUtils.pm::_logit).
@::LOGLINES = ();
# if --version, --help, etc., this just gets thrown away, which is ok.
Modified: trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl
===================================================================
--- trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl 2021-12-06 21:24:33 UTC (rev 61235)
+++ trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl 2021-12-06 22:13:25 UTC (rev 61236)
@@ -5,6 +5,8 @@
# This file is licensed under the GNU General Public License version 2
# or any later version.
+use strict; use warnings;
+
my $svnrev = '$Revision$';
my $datrev = '$Date$';
my $tlmgrrevision;
@@ -85,7 +87,6 @@
use File::Spec;
use Pod::Usage;
use Getopt::Long qw(:config no_autoabbrev permute);
-use strict;
use TeXLive::TLConfig;
use TeXLive::TLPDB;
More information about the tex-live-commits
mailing list.