diff options
author | Norbert Preining <preining@logic.at> | 2018-05-23 02:32:11 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2018-05-23 02:32:11 +0000 |
commit | e17e5c56b96323c959244814ff715acfe8cac5fb (patch) | |
tree | 64224f50b69c4df16c5fa23a5ee66a9c84f4509d | |
parent | 666633386754616182fff6392c83d2e403070bc5 (diff) |
remove some unnecessary tests
git-svn-id: svn://tug.org/texlive/trunk@47800 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r-- | Master/tlpkg/TeXLive/TLPDB.pm | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm index 72d6f1e0f82..236f344851b 100644 --- a/Master/tlpkg/TeXLive/TLPDB.pm +++ b/Master/tlpkg/TeXLive/TLPDB.pm @@ -2020,14 +2020,6 @@ sub _install_data { my @filelist = @$filelistref; - # we assume that $::progs has been set up! - my $wget = $::progs{'wget'}; - my $xzdec = TeXLive::TLUtils::quotify_path_with_spaces($::progs{'xzdec'}); - if (!defined($wget) || !defined($xzdec)) { - tlwarn("TLPDB::_install_data: programs not set up properly; hmm.\n"); - return(0); - } - if (ref $what) { # determine the root from where we install # if the first argument $self is a string, then it should be the |