diff options
author | Norbert Preining <preining@logic.at> | 2008-08-04 13:15:40 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-08-04 13:15:40 +0000 |
commit | aa2aef7d886a2e174bd60303943cfe64968b9966 (patch) | |
tree | 071dcf1cb72ed55059774d91cf6cf9300be26f7c /Master | |
parent | c7f1d63584dbcc4c3b65185bee28d1c2272bf6fc (diff) |
setup_programs: do not test tar on usability ...
git-svn-id: svn://tug.org/texlive/trunk@10070 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 73a39f7a71f..d679f9ec3d3 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -1001,6 +1001,8 @@ C<wget>, C<tar>, C<lzmadec>. The C<$bindir> argument specifies the path to the location of the C<lzmadec> binaries, the C<$platform> gives the TeX Live platform name, used as the extension on the executables. +Returns true if successfull, otherwise false. + =cut sub setup_programs { @@ -1031,9 +1033,11 @@ sub setup_programs { # check that the programs are actually working my $nul = "/dev/null"; $nul = "nul" if ($^O =~ /^MSWin(32|64)$/i); - for my $prog ("lzmadec", "tar", "wget") { + # do not test tar for the moment, you never know what tar is there around + # for my $prog ("lzmadec", "tar", "wget") { + for my $prog ("lzmadec", "wget") { my $opt = $prog eq "lzmadec" ? "--help" : "--version"; - next if (($prog eq "tar") && ($platform eq "i386-openbsd")); + # next if (($prog eq "tar") && ($platform eq "i386-openbsd")); my $ret = system("$::progs{$prog} $opt >$nul 2>$nul"); if ($ret != 0) { tlwarn ("TeXLive::TLUtils::setup_programs failed:\n"); |