diff options
| author | Norbert Preining <preining@logic.at> | 2018-05-26 01:17:05 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2018-05-26 01:17:05 +0000 |
| commit | 0c2fb5ecf8f825401bc1c52353f6f42009a509e5 (patch) | |
| tree | c177037a27991a4ffc4c3d73be6082bf3aeea574 | |
| parent | 651115a95e6c95cafee9180990b46f44bcfe741d (diff) | |
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
| -rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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 ]; |