include the check on supported architectures, remove the patch

git-svn-id: svn://tug.org/texlive/trunk@10974 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 10 insertions, 1 deletions

diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl
index 5203155646f..e111d4de845 100755
--- a/Master/texmf/scripts/texlive/tlmgr.pl
+++ b/Master/texmf/scripts/texlive/tlmgr.pl
@@ -1471,7 +1471,16 @@ sub init_local_db {
   die("cannot find tlpdb at $Master!") unless (defined($localtlpdb));
   # setup the programs, for win32 we need the shipped wget/lzma etc, so we
   # pass the location of these files to setup_programs.
-  if (!setup_programs("$Master/tlpkg/installer", $localtlpdb->option_platform)) {
+  my $ret = setup_programs("$Master/tlpkg/installer", $localtlpdb->option_platform);
+  if ($ret == -1) {
+    tlwarn("no binary of lzmadec for $::_platform_ detected.\n");
+    if (defined($should_i_die) && $should_i_die) {
+      exit 1;
+    } else {
+      tlwarn("Continuing anyway ...\n");
+    }
+  }
+  if (!$ret) {
     tlwarn("Couldn't set up the necessary programs.\nInstallation of packages is not supported.\nPlease report to texlive\@tug.org.\n");
     if (defined($should_i_die) && $should_i_die) {
       finish(1);