--- modules-3.2.9/utility.c 2011-11-28 22:27:13.000000000 +0100 +++ modules-3.2.9-new/utility.c 2012-06-13 15:17:41.570629148 +0200 @@ -727,7 +727,7 @@ int Output_Modulefile_Changes( Tcl_Inter output_unset_variable( (char*) key); } else { val = EMGetEnv(interp, key); - if(val && *val) + if(val) output_set_variable(interp, (char*) key, val); null_free((void *)&val); }