From 0c2fb5ecf8f825401bc1c52353f6f42009a509e5 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Sat, 26 May 2018 01:17:05 +0000 Subject: once more, it is $::progs nor $::prog, the danger of global vars git-svn-id: svn://tug.org/texlive/trunk@47842 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLUtils.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Master') diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 86bc13d27ab..71df6d1613a 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -2367,7 +2367,7 @@ sub setup_programs { # also set up $::{'compressor'} if not already done # this selects the first one # but we might reset this depending on TEXLIVE_COMPRESSOR setting, see below - defined($::prog{'compressor'}) || ($::prog{'compressor'} = $comptype); + defined($::progs{'compressor'}) || ($::progs{'compressor'} = $comptype); } } $::progs{'working_compressors'} = [ @working_compressors ]; -- cgit v1.2.3