From a71e02ac5bf3d420b540bf9074757ca097e1da9b Mon Sep 17 00:00:00 2001
From: Robert Alessi <alessi@robertalessi.net>
Date: Sun, 2 Mar 2025 18:38:01 +0100
Subject: added the option to get Context sources from pragma-ade

---
 tl-build.sh | 44 +++++++++++++++++++++++++++++---------------
 1 file changed, 29 insertions(+), 15 deletions(-)

diff --git a/tl-build.sh b/tl-build.sh
index 9c41db1..548a7fd 100755
--- a/tl-build.sh
+++ b/tl-build.sh
@@ -29,6 +29,11 @@ enable_xindy=""
 # Context
 echo "Include Context?"
 read with_context?'[y/n] '
+if [[ ${with_context} == "y" ]]; then
+    echo "    Ok.  Do I have to retrieve the sources of Context from pragma-ade.nl?"
+    echo "    (If not I will get the sources from TeX Live svn repository.)"
+    read from_pragma_ade?'[y/n] '
+fi
 
 # Asymptote
 echo "Include Asymptote?"
@@ -38,6 +43,8 @@ read with_asymptote?'[y/n] '
 echo "Build TL?"
 read build_tl?'[y/n] '
 
+wget=wget  # or "curl -O" or whatever
+
 # First build: clisp
 if [[ ${with_clisp} == "y" ]]; then
     mkdir $tl_sourcedir/clisp && cd $tl_sourcedir/clisp
@@ -46,7 +53,6 @@ if [[ ${with_clisp} == "y" ]]; then
     clisp_toolsdir=$clisp_basedir/clisp-tools
     clisp_builddir=$clisp_basedir/clisp-build
     mkdir $clisp_toolsdir
-    wget=wget  # or "curl -O" or whatever
     #libsigsegv_ver=libsigsegv-2.13
     libsigsegv_ver=$(cat ${utils_README} | grep libsigsegv_ver= | sed 's/.*=//')
     cd $clisp_basedir
@@ -87,23 +93,31 @@ fi
 # If Context is required, then retrieve and build it first
 if [[ ${with_context} == "y" ]]; then
     cd $tl_sourcedir
-    if [[ -e $1 ]];then
-	context_ver=$(svn list svn://tug.org/texlive/branches/branch${TL_BRANCH}/Master/source | grep luametatex-.*xz | sed 's/.*-\(.*\).tar.xz/\1/')
-	if [[ -d luametatex ]];then
-	    rm -f luametatex-{$context_ver}.tar.xz
-	    rm -rf luametatex
-	fi
-	svn export svn://tug.org/texlive/branches/branch${TL_BRANCH}/Master/source/luametatex-${context_ver}.tar.xz
+    if [[ ${from_pragma_ade} == "y" ]]; then
+	context_tmp=$(mktemp -d)
+	$wget -P ${context_tmp} https://www.pragma-ade.nl/context/latest/cont-tmf.zip
+	unzip ${context_tmp}/cont-tmf.zip 'source/*' -d ${context_tmp}
+	mv ${context_tmp}/source/luametatex ${tl_sourcedir}
+	luametatex_src_dir=luametatex
     else
-	context_ver=$(svn list svn://tug.org/texlive/trunk/Master/source | grep luametatex-.*xz | sed 's/.*-\(.*\).tar.xz/\1/')
-	if [[ -d luametatex ]];then
-	    rm -f luametatex-{$context_ver}.tar.xz
-	    rm -rf luametatex
+	if [[ -e $1 ]];then
+	    context_ver=$(svn list svn://tug.org/texlive/branches/branch${TL_BRANCH}/Master/source | grep luametatex-.*xz | sed 's/.*-\(.*\).tar.xz/\1/')
+	    if [[ -d luametatex ]];then
+		rm -f luametatex-{$context_ver}.tar.xz
+		rm -rf luametatex
+	    fi
+	    svn export svn://tug.org/texlive/branches/branch${TL_BRANCH}/Master/source/luametatex-${context_ver}.tar.xz
+	else
+	    context_ver=$(svn list svn://tug.org/texlive/trunk/Master/source | grep luametatex-.*xz | sed 's/.*-\(.*\).tar.xz/\1/')
+	    if [[ -d luametatex ]];then
+		rm -f luametatex-{$context_ver}.tar.xz
+		rm -rf luametatex
+	    fi
+	    svn export svn://tug.org/texlive/trunk/Master/source/luametatex-${context_ver}.tar.xz
 	fi
-	svn export svn://tug.org/texlive/trunk/Master/source/luametatex-${context_ver}.tar.xz
+	xzcat luametatex-$context_ver.tar.xz | tar xf -
+	luametatex_src_dir=$(xzcat luametatex-$context_ver.tar.xz | tar tf - | head -1)
     fi
-    xzcat luametatex-$context_ver.tar.xz | tar xf -
-    luametatex_src_dir=$(xzcat luametatex-$context_ver.tar.xz | tar tf - | head -1)
     cd ${luametatex_src_dir}
     sh build.sh
 fi
-- 
cgit v1.2.3