summaryrefslogtreecommitdiff
path: root/Master/tlpkg/etc
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-10-14 07:49:36 +0000
committerNorbert Preining <preining@logic.at>2008-10-14 07:49:36 +0000
commitf84fb1fcc64547fc22f9827658ffbf66f85d459a (patch)
tree9750f2d54f7de4d737786ac841045f5e9917fbee /Master/tlpkg/etc
parentc88818e2ddf8133d81dee2995573fda43ff5cdd7 (diff)
include the check on supported architectures, remove the patch
git-svn-id: svn://tug.org/texlive/trunk@10974 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/etc')
-rw-r--r--Master/tlpkg/etc/check-on-supported-arch.diff90
1 files changed, 0 insertions, 90 deletions
diff --git a/Master/tlpkg/etc/check-on-supported-arch.diff b/Master/tlpkg/etc/check-on-supported-arch.diff
deleted file mode 100644
index 0a8e308bbdc..00000000000
--- a/Master/tlpkg/etc/check-on-supported-arch.diff
+++ /dev/null
@@ -1,90 +0,0 @@
-Index: tlpkg/TeXLive/TLUtils.pm
-===================================================================
---- tlpkg/TeXLive/TLUtils.pm (revision 10739)
-+++ tlpkg/TeXLive/TLUtils.pm (working copy)
-@@ -1017,7 +1017,9 @@
- 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.
-+Returns -1 if the architecture is not supported (i.e., there is no
-+lzmadec binary for that arch present), 0 for programs don't work,
-+and 1 for success.
-
- =cut
-
-@@ -1041,10 +1043,10 @@
- $::progs{'tar'} = conv_to_win_path("$bindir/tar.exe");
- $::progs{'lzmadec'} = conv_to_win_path("$bindir/lzma/lzmadec.win32.exe");
- $::progs{'lzma'} = conv_to_win_path("$bindir/lzma/lzma.exe");
--
- } elsif (-r "$bindir/wget/wget.$platform") {
- $::progs{'wget'} = "$bindir/wget/wget.$platform";
- }
-+ return(-1) if (! -r $::progs{'lzmadec'});
- #
- # check that the programs are actually working
- my $nul = "/dev/null";
-Index: install-tl
-===================================================================
---- install-tl (revision 10739)
-+++ install-tl (working copy)
-@@ -308,7 +308,14 @@
-
- # initialize the correct platform
- platform();
--if (!setup_programs ("$::installerdir/tlpkg/installer", "$::_platform_")) {
-+my $setupret = setup_programs ("$::installerdir/tlpkg/installer", "$::_platform_");
-+if ($setupret == -1) {
-+ # that arch seems to be unsupported
-+ tlwarn("It seems that your architecture-operating system combination\n\t$::_platform_\nis not supported at the moment!\nIf you plan to build binaries for it please contact us at tlbuild\@tug.org.\n");
-+ exit 1;
-+}
-+# now $setupret can only be 0 or 1
-+if (!$setupret) {
- tlwarn("Couldn't set up the necessary programs.\nCannot continue with installation.\nPlease report to texlive\@tug.org.\n");
- exit 1;
- }
-Index: tlpkg/bin/tl-update-containers
-===================================================================
---- tlpkg/bin/tl-update-containers (revision 10744)
-+++ tlpkg/bin/tl-update-containers (working copy)
-@@ -163,7 +163,15 @@
- $::progs{'tar'} = "tar";
- } else {
- # do a full setup
-- &TeXLive::TLUtils::setup_programs("$Master/tlpkg/installer");
-+ my $ret = &TeXLive::TLUtils::setup_programs("$Master/tlpkg/installer");
-+ if ($ret == -1) {
-+ tlwarn("no binary of lzmadec for $::_platform_ detected, aborting!\n");
-+ exit 1;
-+ }
-+ if (!$ret) {
-+ tlwarn("binaries could not be set up, aborting!\n");
-+ exit 1;
-+ }
- }
-
- # get list of packages.
-Index: texmf/scripts/texlive/tlmgr.pl
-===================================================================
---- texmf/scripts/texlive/tlmgr.pl (revision 10750)
-+++ texmf/scripts/texlive/tlmgr.pl (working copy)
-@@ -1133,7 +1133,16 @@
- 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) {
- exit 1;