summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2017-04-16 22:03:46 +0000
committerKarl Berry <karl@freefriends.org>2017-04-16 22:03:46 +0000
commitbf2a940bb5ec1bd50bff144ef44931ae39b266a4 (patch)
tree428b8f31114e166b382ae00f402c58809ad62bb5
parent35dd8c601e8c1b51427690d2e61c34cb6d5d6e41 (diff)
silence perl -warnings
git-svn-id: svn://tug.org/texlive/trunk@43850 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm14
1 files changed, 8 insertions, 6 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index df4624e84ef..56ca159a83e 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -107,12 +107,11 @@ C<TeXLive::TLUtils> -- utilities used in TeX Live infrastructure
our $PERL_SINGLE_QUOTE; # we steal code from Text::ParseWords
use vars qw(
$::LOGFILENAME @::LOGLINES
- @::debug_hook @::ddebug_hook @::dddebug_hook @::info_hook @::warn_hook
- @::install_packages_hook
- $::machinereadable
- $::no_execute_actions
- $::regenerate_all_formats
+ @::debug_hook @::ddebug_hook @::dddebug_hook @::info_hook
+ @::install_packages_hook @::warn_hook
$TeXLive::TLDownload::net_lib_avail
+ $::checksum_method $::gui_mode $::machinereadable $::no_execute_actions
+ $::regenerate_all_formats
);
BEGIN {
@@ -297,6 +296,9 @@ sub platform_name {
# -> i386-darwin if x86
# -> powerpc-darwin if ppc
#
+ # (BTW, uname -r numbers are larger by 4 than the minor version.
+ # We don't use uname numbers here.)
+ #
my $mactex_version = 10; # this will change in the future.
#
# Most robust approach is apparently to check sw_vers (os version,
@@ -4051,7 +4053,7 @@ sub setup_sys_user_mode {
$texmfvar = $TEXMFVAR;
} else {
print STDERR "$prg [ERROR]: Either -user or -sys mode is required.\n" .
- "See $TeXLive::TLConfig::SYSUSERURL for details!\n";
+ "See http://tug.org/texlive/scripts-sys-user.html for details.\n";
exit(1);
}
return ($texmfconfig, $texmfvar);