package provides for the dynamic modification of a user’s environment via modulefiles.
| 100-pager.exp (modules-5.1.1.tar.bz2) | : | 100-pager.exp (modules-5.2.0.tar.bz2) |
|---|
| | |
| skipping to change at line 60 | | skipping to change at line 60 |
|---|
| if {$::install_libtclenvmodules ne {n}} { | | if {$::install_libtclenvmodules ne {n}} { |
| if {$::install_multilibsupport eq {y}} { | | if {$::install_multilibsupport eq {y}} { |
| lappend ans "DEBUG setState: machine set to '$::tcl_platform(machine
)'" | | lappend ans "DEBUG setState: machine set to '$::tcl_platform(machine
)'" |
| } | | } |
| lappend ans "DEBUG setConf: tcl_ext_lib set to '$::tclextlib_file'(\\nDE
BUG Load Tcl extension library \\(.+\\))?(\\nDEBUG setState: tcl_ext_lib_loaded
set to '1')?" | | lappend ans "DEBUG setConf: tcl_ext_lib set to '$::tclextlib_file'(\\nDE
BUG Load Tcl extension library \\(.+\\))?(\\nDEBUG setState: tcl_ext_lib_loaded
set to '1')?" |
| } | | } |
| lappend ans "DEBUG setConf: siteconfig set to '$siteconfig_filere'(\\nDEBUG
sourceSiteConfig: Source site configuration \\($siteconfig_filere\\))?(\\nDEBUG
setState: siteconfig_loaded set to '1')?" | | lappend ans "DEBUG setConf: siteconfig set to '$siteconfig_filere'(\\nDEBUG
sourceSiteConfig: Source site configuration \\($siteconfig_filere\\))?(\\nDEBUG
setState: siteconfig_loaded set to '1')?" |
| lappend ans "DEBUG setConf: locked_configs set to '$::install_lockedconfigs'
" | | lappend ans "DEBUG setConf: locked_configs set to '$::install_lockedconfigs'
" |
| lappend ans "DEBUG setState: supported_shells set to 'sh bash ksh zsh csh tc
sh fish cmd tcl perl python ruby lisp cmake r'" | | lappend ans "DEBUG setState: supported_shells set to 'sh bash ksh zsh csh tc
sh fish cmd tcl perl python ruby lisp cmake r'" |
| lappend ans "DEBUG setState: shell set to 'sh'" | | lappend ans "DEBUG setState: shell set to 'sh'" |
|
| lappend ans "DEBUG setState: shelltype set to 'sh'" | | |
| lappend ans "DEBUG setState: subcmd set to ''" | | lappend ans "DEBUG setState: subcmd set to ''" |
| lappend ans "DEBUG setState: subcmd_args set to ''" | | lappend ans "DEBUG setState: subcmd_args set to ''" |
| lappend ans "DEBUG setState: init_error_report set to '1'" | | lappend ans "DEBUG setState: init_error_report set to '1'" |
| lappend ans "DEBUG setConf: verbosity set to 'debug'" | | lappend ans "DEBUG setConf: verbosity set to 'debug'" |
| lappend ans "DEBUG setConf: term_background set to '$install_termbg'" | | lappend ans "DEBUG setConf: term_background set to '$install_termbg'" |
| lappend ans "(DEBUG initConfColors: Ignore invalid default.*\\n)?DEBUG setCo
nf: colors set to '.*'" | | lappend ans "(DEBUG initConfColors: Ignore invalid default.*\\n)?DEBUG setCo
nf: colors set to '.*'" |
| lappend ans "DEBUG setConf: color set to '0'" | | lappend ans "DEBUG setConf: color set to '0'" |
| lappend ans "DEBUG setConf: pager set to '$pager_cmd'" | | lappend ans "DEBUG setConf: pager set to '$pager_cmd'" |
| if {$use} { | | if {$use} { |
| lappend ans "DEBUG setState: is_stderr_tty set to '$is_stderr_tty'" | | lappend ans "DEBUG setState: is_stderr_tty set to '$is_stderr_tty'" |
| | |
| skipping to change at line 85 | | skipping to change at line 84 |
|---|
| lappend ans "DEBUG setState: inhibit_errreport set to '0'" | | lappend ans "DEBUG setState: inhibit_errreport set to '0'" |
| lappend ans "$warn_msgs: couldn't execute \"$cmd\": no such file or dire
ctory" | | lappend ans "$warn_msgs: couldn't execute \"$cmd\": no such file or dire
ctory" |
| set reportfd stderr | | set reportfd stderr |
| } elseif {$is_stderr_tty && $use} { | | } elseif {$is_stderr_tty && $use} { |
| set reportfd file\\d | | set reportfd file\\d |
| } else { | | } else { |
| set reportfd stderr | | set reportfd stderr |
| } | | } |
| lappend ans "DEBUG setState: report_format set to 'regular'" | | lappend ans "DEBUG setState: report_format set to 'regular'" |
| lappend ans "DEBUG setState: reportfd set to '$reportfd'" | | lappend ans "DEBUG setState: reportfd set to '$reportfd'" |
|
| | lappend ans "DEBUG setState: timer set to '0'" |
| lappend ans $::vers_reportre | | lappend ans $::vers_reportre |
| | |
| testouterr_cmd_re "sh" "-V -D$modarg" "" [join $ans "\n"] | | testouterr_cmd_re "sh" "-V -D$modarg" "" [join $ans "\n"] |
| } | | } |
| | |
| # | | # |
| # The tests | | # The tests |
| # | | # |
| | |
| # vanilla test, no related-env variable set | | # vanilla test, no related-env variable set |
| | |
| skipping to change at line 293 | | skipping to change at line 293 |
|---|
| if {$::install_multilibsupport eq {y}} { | | if {$::install_multilibsupport eq {y}} { |
| lappend anserr "DEBUG setState: machine set to '$::tcl_platform(machine)'" | | lappend anserr "DEBUG setState: machine set to '$::tcl_platform(machine)'" |
| } | | } |
| lappend anserr "DEBUG setConf: tcl_ext_lib set to '$tclextlib_file'(\\nDEBUG Loa
d Tcl extension library \\(.+\\))?(\\nDEBUG setState: tcl_ext_lib_loaded set to
'1')?" | | lappend anserr "DEBUG setConf: tcl_ext_lib set to '$tclextlib_file'(\\nDEBUG Loa
d Tcl extension library \\(.+\\))?(\\nDEBUG setState: tcl_ext_lib_loaded set to
'1')?" |
| lappend anserr "DEBUG setConf: siteconfig set to '$siteconfig_filere'" | | lappend anserr "DEBUG setConf: siteconfig set to '$siteconfig_filere'" |
| lappend anserr "DEBUG sourceSiteConfig: Source site configuration \\($siteconfig
_filere\\)" | | lappend anserr "DEBUG sourceSiteConfig: Source site configuration \\($siteconfig
_filere\\)" |
| lappend anserr "DEBUG setState: siteconfig_loaded set to '1'" | | lappend anserr "DEBUG setState: siteconfig_loaded set to '1'" |
| lappend anserr "DEBUG setConf: locked_configs set to '$install_lockedconfigs'" | | lappend anserr "DEBUG setConf: locked_configs set to '$install_lockedconfigs'" |
| lappend anserr "DEBUG setState: supported_shells set to 'sh bash ksh zsh csh tcs
h fish cmd tcl perl python ruby lisp cmake r'" | | lappend anserr "DEBUG setState: supported_shells set to 'sh bash ksh zsh csh tcs
h fish cmd tcl perl python ruby lisp cmake r'" |
| lappend anserr "DEBUG setState: shell set to 'sh'" | | lappend anserr "DEBUG setState: shell set to 'sh'" |
|
| lappend anserr "DEBUG setState: shelltype set to 'sh'" | | |
| lappend anserr "DEBUG setState: subcmd set to 'load'" | | lappend anserr "DEBUG setState: subcmd set to 'load'" |
| lappend anserr "DEBUG setState: subcmd_args set to '$module'" | | lappend anserr "DEBUG setState: subcmd_args set to '$module'" |
| lappend anserr "DEBUG setState: init_error_report set to '1'" | | lappend anserr "DEBUG setState: init_error_report set to '1'" |
| lappend anserr "(DEBUG .*)+" | | lappend anserr "(DEBUG .*)+" |
| lappend anserr "DEBUG setConf: pager set to '$install_pagercmd'" | | lappend anserr "DEBUG setConf: pager set to '$install_pagercmd'" |
| lappend anserr "DEBUG setState: is_stderr_tty set to '1'" | | lappend anserr "DEBUG setState: is_stderr_tty set to '1'" |
| lappend anserr "DEBUG setState: paginate set to '1'" | | lappend anserr "DEBUG setState: paginate set to '1'" |
| lappend anserr "DEBUG setState: report_format set to 'regular'" | | lappend anserr "DEBUG setState: report_format set to 'regular'" |
| lappend anserr "DEBUG setState: reportfd set to 'file\\d'" | | lappend anserr "DEBUG setState: reportfd set to 'file\\d'" |
|
| | lappend anserr "DEBUG setState: timer set to '0'" |
| lappend anserr "(DEBUG .*)+" | | lappend anserr "(DEBUG .*)+" |
| lappend anserr "load" | | lappend anserr "load" |
| lappend anserr "(DEBUG .*)+" | | lappend anserr "(DEBUG .*)+" |
| testouterr_cmd_re "sh" "load $module -D" $ans [join $anserr "\n"] | | testouterr_cmd_re "sh" "load $module -D" $ans [join $anserr "\n"] |
| | |
| } | | } |
| | |
| # | | # |
| # Clean up variables used in this test case | | # Clean up variables used in this test case |
| # | | # |
| | | |
| End of changes. 4 change blocks. |
|---|
| 2 lines changed or deleted | | 2 lines changed or added |
|---|
"Fossies" - the Fresh Open Source Software Archive 