From: Jon Ringle <[email protected]>

Signed-off-by: Jon Ringle <[email protected]>
---
 bin/ptxdist | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/bin/ptxdist b/bin/ptxdist
index f823ebe..10fc492 100755
--- a/bin/ptxdist
+++ b/bin/ptxdist
@@ -2146,8 +2146,15 @@ setup_env() {
        whitelist="${*}"
        whitelist="${whitelist:+|}${whitelist// /|}"
 
+       ptx_test_func_env_name(){ :; }
+       export -f ptx_test_func_env_name
+       func_env_name=$(/usr/bin/env | grep ptx_test_func_env_name|cut -f1 -d=)
+       func_prefix=${func_env_name/ptx_test_func_env_name*}
+       func_suffix=${func_env_name/*ptx_test_func_env_name}
+
        unset $(/usr/bin/env | \
                sed -n -e "s/^\([^=[:space:]]\+\)=.*$/\1/p" | \
+               sed -e "s/^${func_prefix}\(.*\)${func_suffix}$/\1/g" | \
                egrep -v 
"^(PTXDIST_PTXRC|PTX_AUTOBUILD_DESTDIR|CCACHE_.*|PWD|HOME|USER|PATH|TERM|COLUMNS|LINES|DISPLAY|TMPDIR|http_proxy|https_proxy|ftp_proxy|no_proxy${whitelist})$"
 )
 
        ######## the environment is clean now ########
-- 
1.8.5.4


-- 
ptxdist mailing list
[email protected]

Reply via email to