"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "testsuite/modules.70-maint/220-config.exp" between
modules-5.1.1.tar.bz2 and modules-5.2.0.tar.bz2

About: The Environment Modules package provides for the dynamic modification of a user’s environment via modulefiles.

220-config.exp  (modules-5.1.1.tar.bz2):220-config.exp  (modules-5.2.0.tar.bz2)
skipping to change at line 78 skipping to change at line 78
implicit_default [expr {$install_implicitdefault eq {y}}]\ implicit_default [expr {$install_implicitdefault eq {y}}]\
implicit_requirement [expr {$install_implicitrequirement eq {y}}]\ implicit_requirement [expr {$install_implicitrequirement eq {y}}]\
list_output $install_listoutput\ list_output $install_listoutput\
list_terse_output $install_listterseoutput\ list_terse_output $install_listterseoutput\
locked_configs $install_lockedconfigs\ locked_configs $install_lockedconfigs\
mcookie_check always\ mcookie_check always\
mcookie_version_check [expr {$install_mcookieversioncheck eq {y}}]\ mcookie_version_check [expr {$install_mcookieversioncheck eq {y}}]\
ml [expr {$install_ml eq {y}}]\ ml [expr {$install_ml eq {y}}]\
nearly_forbidden_days $install_nearlyforbiddendays\ nearly_forbidden_days $install_nearlyforbiddendays\
pager "$install_pagercmd"\ pager "$install_pagercmd"\
protected_envvars <undef>\
quarantine_support [expr {$install_quarantinesupport eq {y}}]\ quarantine_support [expr {$install_quarantinesupport eq {y}}]\
rcfile <undef>\ rcfile <undef>\
redirect_output 1\ redirect_output 1\
reset_target_state __init__\
run_quarantine <undef>\ run_quarantine <undef>\
search_match $install_searchmatch\ search_match $install_searchmatch\
set_shell_startup [expr {$install_setshellstartup eq {y}}]\ set_shell_startup [expr {$install_setshellstartup eq {y}}]\
shells_with_ksh_fpath {}\ shells_with_ksh_fpath {}\
silent_shell_debug [expr {$install_silentshdbgsupport eq {y}}]\ silent_shell_debug [expr {$install_silentshdbgsupport eq {y}}]\
siteconfig $siteconfig_filere\ siteconfig $siteconfig_filere\
tcl_ext_lib lib/libtclenvmodules$install_shlib_suffix\ tcl_ext_lib lib/libtclenvmodules$install_shlib_suffix\
tcl_linter $install_tcllintercmd\
tag_abbrev $install_tagabbrev\ tag_abbrev $install_tagabbrev\
tag_color_name $install_tagcolorname\ tag_color_name $install_tagcolorname\
term_background $install_termbg\ term_background $install_termbg\
term_width 0\ term_width 0\
unload_match_order $install_unloadmatchorder\ unload_match_order $install_unloadmatchorder\
variant_shortcut "$install_variantshortcut"\ variant_shortcut "$install_variantshortcut"\
verbosity $install_verbosity\ verbosity $install_verbosity\
wa_277 [expr {$install_wa277 eq {y}}]\ wa_277 [expr {$install_wa277 eq {y}}]\
] ]
skipping to change at line 124 skipping to change at line 127
icase MODULES_ICASE\ icase MODULES_ICASE\
implicit_default MODULES_IMPLICIT_DEFAULT\ implicit_default MODULES_IMPLICIT_DEFAULT\
implicit_requirement MODULES_IMPLICIT_REQUIREMENT\ implicit_requirement MODULES_IMPLICIT_REQUIREMENT\
list_output MODULES_LIST_OUTPUT\ list_output MODULES_LIST_OUTPUT\
list_terse_output MODULES_LIST_TERSE_OUTPUT\ list_terse_output MODULES_LIST_TERSE_OUTPUT\
mcookie_check MODULES_MCOOKIE_CHECK\ mcookie_check MODULES_MCOOKIE_CHECK\
mcookie_version_check MODULES_MCOOKIE_VERSION_CHECK\ mcookie_version_check MODULES_MCOOKIE_VERSION_CHECK\
ml MODULES_ML\ ml MODULES_ML\
nearly_forbidden_days MODULES_NEARLY_FORBIDDEN_DAYS\ nearly_forbidden_days MODULES_NEARLY_FORBIDDEN_DAYS\
pager MODULES_PAGER\ pager MODULES_PAGER\
protected_envvars MODULES_PROTECTED_ENVVARS\
quarantine_support MODULES_QUARANTINE_SUPPORT\ quarantine_support MODULES_QUARANTINE_SUPPORT\
rcfile MODULERCFILE\ rcfile MODULERCFILE\
redirect_output MODULES_REDIRECT_OUTPUT\ redirect_output MODULES_REDIRECT_OUTPUT\
reset_target_state MODULES_RESET_TARGET_STATE\
run_quarantine MODULES_RUN_QUARANTINE\ run_quarantine MODULES_RUN_QUARANTINE\
search_match MODULES_SEARCH_MATCH\ search_match MODULES_SEARCH_MATCH\
set_shell_startup MODULES_SET_SHELL_STARTUP\ set_shell_startup MODULES_SET_SHELL_STARTUP\
shells_with_ksh_fpath MODULES_SHELLS_WITH_KSH_FPATH\ shells_with_ksh_fpath MODULES_SHELLS_WITH_KSH_FPATH\
silent_shell_debug MODULES_SILENT_SHELL_DEBUG\ silent_shell_debug MODULES_SILENT_SHELL_DEBUG\
tag_abbrev MODULES_TAG_ABBREV\ tag_abbrev MODULES_TAG_ABBREV\
tag_color_name MODULES_TAG_COLOR_NAME\ tag_color_name MODULES_TAG_COLOR_NAME\
tcl_linter MODULES_TCL_LINTER\
term_background MODULES_TERM_BACKGROUND\ term_background MODULES_TERM_BACKGROUND\
term_width MODULES_TERM_WIDTH\ term_width MODULES_TERM_WIDTH\
unload_match_order MODULES_UNLOAD_MATCH_ORDER\ unload_match_order MODULES_UNLOAD_MATCH_ORDER\
variant_shortcut MODULES_VARIANT_SHORTCUT\ variant_shortcut MODULES_VARIANT_SHORTCUT\
verbosity MODULES_VERBOSITY\ verbosity MODULES_VERBOSITY\
wa_277 MODULES_WA_277\ wa_277 MODULES_WA_277\
] ]
array set configvalid [list\ array set configvalid [list\
advanced_version_spec {0 1}\ advanced_version_spec {0 1}\
skipping to change at line 387 skipping to change at line 393
if {[info exists configvar($param)] || $param eq {runenv_foo}} { if {[info exists configvar($param)] || $param eq {runenv_foo}} {
append tserr " \\(env-var\\)" append tserr " \\(env-var\\)"
} }
} }
} }
append tserr "\n\n$state_header" append tserr "\n\n$state_header"
if {[auto_execok uname] eq {} || [auto_execok domainname] eq {}} { if {[auto_execok uname] eq {} || [auto_execok domainname] eq {}} {
append tserr "(\nWARNING: Command '\\S+' cannot be found)+" append tserr "(\nWARNING: Command '\\S+' cannot be found)+"
} }
if {$group_name_fetch_failed} {
if {$install_libtclenvmodules eq {y}} {
append tserr "(\nWARNING: couldn't find name for group id \"\\S+\": Succ
ess)+"
} else {
append tserr "(\nWARNING: .*\n .*/id: cannot find name for group ID \\S
+)+"
}
}
foreach param $statelist { foreach param $statelist {
append tserr "\n$param\\s+.*" append tserr "\n$param\\s+.*"
} }
append tserr "\n\n$envvar_header" append tserr "\n\n$envvar_header"
set envvar_list [list] set envvar_list [list]
foreach var [list LOADEDMODULES _LMFILES_ MODULE* __MODULES_* __MODULES_SHARE_* *_module*] { foreach var [list LOADEDMODULES _LMFILES_ MODULE* __MODULES_* __MODULES_SHARE_* *_module*] {
set envvar_list [concat $envvar_list [array names env -glob $var]] set envvar_list [concat $envvar_list [array names env -glob $var]]
} }
foreach envvar [lsort -unique $envvar_list] { foreach envvar [lsort -unique $envvar_list] {
append tserr "\n[regsub -all {([\\${}*?()+\[\]])} $envvar {\\\1}]\\s+[regsub -all {([\\${}*?()+\[\]])} $env($envvar) {\\\1}]" append tserr "\n[regsub -all {([\\${}*?()+\[\]])} $envvar {\\\1}]\\s+[regsub -all {([\\${}*?()+\[\]])} $env($envvar) {\\\1}]"
skipping to change at line 415 skipping to change at line 428
append tserr "\n$param\\s+$configdfl($param) \\(locked\\)" append tserr "\n$param\\s+$configdfl($param) \\(locked\\)"
} else { } else {
append tserr "\n$param\\s+$configset($param)" append tserr "\n$param\\s+$configset($param)"
if {[info exists configvar($param)] || $param eq {runenv_foo}} { if {[info exists configvar($param)] || $param eq {runenv_foo}} {
append tserr " \\(env-var\\)" append tserr " \\(env-var\\)"
} }
} }
} }
append tserr "\n\n$state_header" append tserr "\n\n$state_header"
append tserr "(\nWARNING: Command '\\S+' cannot be found)+" append tserr "(\nWARNING: Command '\\S+' cannot be found)+"
if {$group_name_fetch_failed} {
if {$install_libtclenvmodules eq {y}} {
append tserr "(\nWARNING: couldn't find name for group id \"\\S+\": Succ
ess)+"
} else {
append tserr "(\nWARNING: Command '\\S+' cannot be found)*"
}
}
append tserr "(\nWARNING: Command '\\S+' cannot be found)*"
foreach param $statelist { foreach param $statelist {
append tserr "\n$param\\s+.*" append tserr "\n$param\\s+.*"
} }
append tserr "\n\n$envvar_header" append tserr "\n\n$envvar_header"
set envvar_list [list] set envvar_list [list]
foreach var [list LOADEDMODULES _LMFILES_ MODULE* __MODULES_* __MODULES_SHARE_* *_module*] { foreach var [list LOADEDMODULES _LMFILES_ MODULE* __MODULES_* __MODULES_SHARE_* *_module*] {
set envvar_list [concat $envvar_list [array names env -glob $var]] set envvar_list [concat $envvar_list [array names env -glob $var]]
} }
foreach envvar [lsort -unique $envvar_list] { foreach envvar [lsort -unique $envvar_list] {
append tserr "\n[regsub -all {([\\${}*?()+\[\]])} $envvar {\\\1}]\\s+[regsub -all {([\\${}*?()+\[\]])} $env($envvar) {\\\1}]" append tserr "\n[regsub -all {([\\${}*?()+\[\]])} $envvar {\\\1}]\\s+[regsub -all {([\\${}*?()+\[\]])} $env($envvar) {\\\1}]"
skipping to change at line 447 skipping to change at line 468
append tserr "\n$param\\s+$configset($param)" append tserr "\n$param\\s+$configset($param)"
if {[info exists configvar($param)] || $param eq {runenv_foo}} { if {[info exists configvar($param)] || $param eq {runenv_foo}} {
append tserr " \\(env-var\\)" append tserr " \\(env-var\\)"
} }
} }
} }
append tserr "\n\n$state_header" append tserr "\n\n$state_header"
if {[auto_execok uname] eq {} || [auto_execok domainname] eq {}} { if {[auto_execok uname] eq {} || [auto_execok domainname] eq {}} {
append tserr "(\nWARNING: Command '\\S+' cannot be found)+" append tserr "(\nWARNING: Command '\\S+' cannot be found)+"
} }
if {$group_name_fetch_failed} {
if {$install_libtclenvmodules eq {y}} {
append tserr "(\nWARNING: couldn't find name for group id \"\\S+\": Succ
ess)+"
} else {
append tserr "(\nWARNING: .*\n .*/id: cannot find name for group ID \\S
+)+"
}
}
foreach param $statelist { foreach param $statelist {
append tserr "\n$param\\s+.*" append tserr "\n$param\\s+.*"
} }
append tserr "\n\n$envvar_header" append tserr "\n\n$envvar_header"
set envvar_list [list] set envvar_list [list]
foreach var [list LOADEDMODULES _LMFILES_ MODULE* __MODULES_* __MODULES_SHARE_* *_module*] { foreach var [list LOADEDMODULES _LMFILES_ MODULE* __MODULES_* __MODULES_SHARE_* *_module*] {
set envvar_list [concat $envvar_list [array names env -glob $var]] set envvar_list [concat $envvar_list [array names env -glob $var]]
} }
foreach envvar [lsort -unique $envvar_list] { foreach envvar [lsort -unique $envvar_list] {
append tserr "\n[regsub -all {([\\${}*?()+\[\]])} $envvar {\\\1}]\\s+[regsub -all {([\\${}*?()+\[\]])} $env($envvar) {\\\1}]" append tserr "\n[regsub -all {([\\${}*?()+\[\]])} $envvar {\\\1}]\\s+[regsub -all {([\\${}*?()+\[\]])} $env($envvar) {\\\1}]"
 End of changes. 9 change blocks. 
0 lines changed or deleted 33 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)