From 5aa28567dca799a746db5c20e400edcfc4031be1 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 21 Apr 2016 19:08:52 +0000 Subject: TLCrypto.pm: new module with all the functions using digests/gpg, extracted from TLUtils.pm. TLUtils.pm: functions moved from here, change calls. TLConfig.pm: doc. TLPDB.pm, TLPOBJ.pm, install-tl, tlmgr.pl: use TLCrypto, change calls, doc. git-svn-id: svn://tug.org/texlive/trunk@40652 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLConfig.pm | 18 ++++++------------ 1 file changed, 6 insertions(+), 12 deletions(-) (limited to 'Master/tlpkg/TeXLive/TLConfig.pm') diff --git a/Master/tlpkg/TeXLive/TLConfig.pm b/Master/tlpkg/TeXLive/TLConfig.pm index 80ba9acf0c8..2b980b2034a 100644 --- a/Master/tlpkg/TeXLive/TLConfig.pm +++ b/Master/tlpkg/TeXLive/TLConfig.pm @@ -7,15 +7,8 @@ package TeXLive::TLConfig; my $svnrev = '$Revision$'; -my $_modulerevision; -if ($svnrev =~ m/: ([0-9]+) /) { - $_modulerevision = $1; -} else { - $_modulerevision = "unknown"; -} -sub module_revision { - return $_modulerevision; -} +my $_modulerevision = ($svnrev =~ m/: ([0-9]+) /) ? $1 : "unknown"; +sub module_revision { return $_modulerevision; } BEGIN { use Exporter (); @@ -218,7 +211,7 @@ our $F_NOPOSTACTION = 4; # The length of a checksum generated by tlchecksum and contained in # texlive.tlpdb.checksum. Needs to be in agreement with the hash -# method used in TLUtils::tlchecksum and TLUtils::tldigest +# method used in TLCrypto::tlchecksum and TLCrypto::tldigest $ChecksumLength = 128; # The program generating the checksum for the file given as first @@ -315,8 +308,9 @@ relocated, defaults to C". =head1 SEE ALSO -The modules L, L, -L, L, L. +All the other TeX Live modules and scripts, especially C and +C, and the documentation in the repository: +C. =head1 AUTHORS AND COPYRIGHT -- cgit v1.2.3