diff --git a/testsuite/modules.00-init/100-pager.exp b/testsuite/modules.00-init/100-pager.exp index 84e5dc49..78e389cf 100644 --- a/testsuite/modules.00-init/100-pager.exp +++ b/testsuite/modules.00-init/100-pager.exp @@ -84,6 +84,9 @@ proc pager_test_case {modarg use asked cmd opts} { lappend ans "DEBUG setState: reportfd set to '$reportfd'" lappend ans "DEBUG setState: timer set to '0'" lappend ans $::vers_reportre + lappend ans "DEBUG setConf: logger set to '$::install_loggercmd'" + lappend ans "DEBUG setState: logging set to '0'" + lappend ans "DEBUG setState: logfd set to ''" testouterr_cmd_re "sh" "-V -D$modarg" "" [join $ans "\n"] } diff --git a/testsuite/modules.00-init/120-siteconfig.exp b/testsuite/modules.00-init/120-siteconfig.exp index cc31c0de..0d8941d4 100644 --- a/testsuite/modules.00-init/120-siteconfig.exp +++ b/testsuite/modules.00-init/120-siteconfig.exp @@ -65,6 +65,9 @@ proc test_getSiteConfig {siteconfig isvalid islocked} { lappend ans "DEBUG setState: reportfd set to 'stderr'" lappend ans "DEBUG setState: timer set to '0'" lappend ans $::vers_reportre + lappend ans "DEBUG setConf: logger set to '$::install_loggercmd'" + lappend ans "DEBUG setState: logging set to '0'" + lappend ans "DEBUG setState: logfd set to ''" setenv_var MODULES_SITECONFIG $siteconfig testouterr_cmd_re sh {--no-pager -D -V} {} [join $ans \n] @@ -106,6 +109,9 @@ lappend ans "DEBUG setState: report_format set to 'regular'" lappend ans "DEBUG setState: reportfd set to 'file\\d'" lappend ans "DEBUG setState: timer set to '0'" lappend ans $vers_reportre +lappend ans "DEBUG setConf: logger set to '$install_loggercmd'" +lappend ans "DEBUG setState: logging set to '0'" +lappend ans "DEBUG setState: logfd set to ''" testouterr_cmd_re "sh" "-V" "" [join $ans "\n"] # test variable superseding of regular siteconfig file by additional siteconfig file if enabled diff --git a/testsuite/modules.00-init/150-access-init.exp b/testsuite/modules.00-init/150-access-init.exp index 23878338..bf9dd54e 100644 --- a/testsuite/modules.00-init/150-access-init.exp +++ b/testsuite/modules.00-init/150-access-init.exp @@ -59,6 +59,9 @@ if {[info exists tclextlib_file]} { lappend ans "DEBUG setState: reportfd set to 'stderr'" lappend ans "DEBUG setState: timer set to '0'" lappend ans $vers_reportre + lappend ans "DEBUG setConf: logger set to '$::install_loggercmd'" + lappend ans "DEBUG setState: logging set to '0'" + lappend ans "DEBUG setState: logfd set to ''" testouterr_cmd_re sh {--no-pager -D -V} {} [join $ans \n] restore_file_perms $tclextlib_file diff --git a/testsuite/modules.00-init/160-multilib.exp b/testsuite/modules.00-init/160-multilib.exp index 11d1fa00..0a142db9 100644 --- a/testsuite/modules.00-init/160-multilib.exp +++ b/testsuite/modules.00-init/160-multilib.exp @@ -29,6 +29,7 @@ lappend ans "DEBUG Load Tcl extension library \\($tclextlib_file\\)" lappend ans {DEBUG setState: tcl_ext_lib_loaded set to '1'} lappend ans {(.*)+} lappend ans $vers_reportre +lappend ans {(.*)+} testouterr_cmd_re sh {-D -V} OK [join $ans \n] 1 file mkdir lib64 @@ -41,6 +42,7 @@ lappend ans "DEBUG Load Tcl extension library \\($tclextlib_alt_file\\)" lappend ans {DEBUG setState: tcl_ext_lib_loaded set to '1'} lappend ans {(.*)+} lappend ans $vers_reportre +lappend ans {(.*)+} testouterr_cmd_re sh {-D -V} OK [join $ans \n] 1 file delete $tclextlib_alt_file diff --git a/testsuite/modules.70-maint/070-display.exp b/testsuite/modules.70-maint/070-display.exp index 3b226666..f7da4d92 100644 --- a/testsuite/modules.70-maint/070-display.exp +++ b/testsuite/modules.70-maint/070-display.exp @@ -130,7 +130,8 @@ $modlin (DEBUG .*)+ DEBUG renderSettings: 2 error\\\(s\\\) detected. DEBUG setState: false_rendered set to '1' -DEBUG setState: shelltype set to 'csh'" +DEBUG setState: shelltype set to 'csh' +(DEBUG .*)+" set out_pat_4 "$modlin $modpathre/test/2.0: