tcl: allow passing in extra wrapper args through tclWrapperArgs

This commit is contained in:
Sandro Jäckel 2021-06-17 20:39:44 +02:00
parent 6f910f41f4
commit 4109b119c2
No known key found for this signature in database
GPG key ID: 3AF5A43A3EECC2E5

View file

@ -2,6 +2,8 @@
# * wrap any installed executables with a wrapper that configures TCLLIBPATH
# * write a setup hook that extends the TCLLIBPATH of any anti-dependencies
tclWrapperArgs=( ${tclWrapperArgs-} )
# Add a directory to TCLLIBPATH, provided that it exists
_addToTclLibPath() {
local tclPkg="$1"
@ -50,10 +52,12 @@ wrapTclBins() {
return
fi
tclWrapperArgs+=(--prefix TCLLIBPATH ' ' "$TCLLIBPATH")
find "$tclBinsDir" -type f -executable -print |
while read -r someBin; do
echo "Adding TCLLIBPATH wrapper for $someBin"
wrapProgram "$someBin" --prefix TCLLIBPATH ' ' "$TCLLIBPATH"
wrapProgram "$someBin" "${tclWrapperArgs[@]}"
done
}