tcl: allow passing in extra wrapper args through tclWrapperArgs
This commit is contained in:
parent
6f910f41f4
commit
4109b119c2
|
@ -2,6 +2,8 @@
|
||||||
# * wrap any installed executables with a wrapper that configures TCLLIBPATH
|
# * wrap any installed executables with a wrapper that configures TCLLIBPATH
|
||||||
# * write a setup hook that extends the TCLLIBPATH of any anti-dependencies
|
# * write a setup hook that extends the TCLLIBPATH of any anti-dependencies
|
||||||
|
|
||||||
|
tclWrapperArgs=( ${tclWrapperArgs-} )
|
||||||
|
|
||||||
# Add a directory to TCLLIBPATH, provided that it exists
|
# Add a directory to TCLLIBPATH, provided that it exists
|
||||||
_addToTclLibPath() {
|
_addToTclLibPath() {
|
||||||
local tclPkg="$1"
|
local tclPkg="$1"
|
||||||
|
@ -50,10 +52,12 @@ wrapTclBins() {
|
||||||
return
|
return
|
||||||
fi
|
fi
|
||||||
|
|
||||||
|
tclWrapperArgs+=(--prefix TCLLIBPATH ' ' "$TCLLIBPATH")
|
||||||
|
|
||||||
find "$tclBinsDir" -type f -executable -print |
|
find "$tclBinsDir" -type f -executable -print |
|
||||||
while read -r someBin; do
|
while read -r someBin; do
|
||||||
echo "Adding TCLLIBPATH wrapper for $someBin"
|
echo "Adding TCLLIBPATH wrapper for $someBin"
|
||||||
wrapProgram "$someBin" --prefix TCLLIBPATH ' ' "$TCLLIBPATH"
|
wrapProgram "$someBin" "${tclWrapperArgs[@]}"
|
||||||
done
|
done
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue