ts: update tests with tags reported in msg block

Author: xdelaruelle

testsuite/install.00-init/020-module.exp

@@ -119,7 +119,7 @@ foreach shell $othlang_list {
 }
 
 # ensure advanced_version_spec is efficient on all shells
-set loadunloadout "Loading advvers6/1.3\n  Loading requirement: advvers7/1.0\nUnloading advvers7/1.0\n  Unloading dependent: advvers6/1.3"
+set loadunloadout "Loading advvers6/1.3\n  Loading requirement: advvers7/1.0\nUnloading advvers7/1.0 <aL>\n  Unloading dependent: advvers6/1.3"
 if {![is_config_locked implicit_default]} {
    foreach shell $shell_list {
       testall_cmd $shell "module use $testsuite_modpath.2\; module config implicit_default 1\; module config verbosity normal\; module config advanced_version_spec 1\; module load --auto [email protected]\; module unload --auto [email protected]" {} $loadunloadout 0

testsuite/install.00-init/024-ml.exp

@@ -122,7 +122,7 @@ foreach shell $othlang_list {
 }
 
 # ensure advanced_version_spec is efficient on all shells
-set loadunloadout "Loading advvers6/1.3\n  Loading requirement: advvers7/1.0\nUnloading advvers7/1.0\n  Unloading dependent: advvers6/1.3"
+set loadunloadout "Loading advvers6/1.3\n  Loading requirement: advvers7/1.0\nUnloading advvers7/1.0 <aL>\n  Unloading dependent: advvers6/1.3"
 if {![is_config_locked implicit_default]} {
    foreach shell $shell_list {
       testall_cmd $shell "ml use $testsuite_modpath.2\; ml config implicit_default 1\; ml config verbosity normal\; ml config advanced_version_spec 1\; ml --auto [email protected]\; ml --auto [email protected]" {} $loadunloadout 0

testsuite/modules.00-init/130-auto_handling.exp

@@ -25,7 +25,7 @@ set module_tron "trace/all_on"
 set modulefile_tron "$modpath/$module_tron"
 
 set err_pre [msg_load $module [err_prereq $module_tron]]
-set err_trace [msg_load $module_tron "$warn_msgs: 'module-trace' command not implemented"]
+set err_trace [msg_load "$module_tron <aL>" "$warn_msgs: 'module-trace' command not implemented"]
 append err_trace \n\n[msg_top_load $module {} $module_tron {}]
 
 set ans [list]

testsuite/modules.20-locate/100-wspace.exp

@@ -290,7 +290,7 @@ lappend ans [list unset __MODULES_LMPREREQ]
 lappend ans [list unset _LMFILES_]
 lappend ans [list unset LOADEDMODULES]
 lappend ans [list unset __MODULES_LMTAG]
-testouterr_cmd_re sh {unload --auto space\ yc/3} $ans [msg_top_unload {'space yc/3'} {{'space yc/2'} {spacenc/2}} {} {}]
+testouterr_cmd_re sh {unload --auto space\ yc/3} $ans [msg_top_unload {'space yc/3' <aL>} {{'space yc/2'} {spacenc/2}} {} {}]
 # test UReqUn mechanism
 testouterr_cmd_re sh {unload --auto space\ yc/2} $ans [msg_top_unload {'space yc/2'} {} {{spacenc/2} {'space yc/3'}} {}]
 

testsuite/modules.20-locate/115-forbid.exp

@@ -735,10 +735,10 @@ lappend ans2 [list unset _LMFILES_]
 lappend ans2 [list unset LOADEDMODULES]
 set tomorrow [clock format [expr {[clock seconds]+86400}] -format %Y-%m-%d]
 if {$install_nearlyforbiddendays >= 1} {
-    testouterr_cmd sh {load hide1/5.0} $ans [msg_load hide1/5.0 [err_accessnearlydenied $tomorrow]]
+    testouterr_cmd sh {load hide1/5.0} $ans [msg_load {hide1/5.0 <nF>} [err_accessnearlydenied $tomorrow]]
 }
 setenv_var MODULES_NEARLY_FORBIDDEN_DAYS 1
-testouterr_cmd sh {load hide1/5.0} $ans [msg_load hide1/5.0 [err_accessnearlydenied $tomorrow]]
+testouterr_cmd sh {load hide1/5.0} $ans [msg_load {hide1/5.0 <nF>} [err_accessnearlydenied $tomorrow]]
 testouterr_cmd_re sh {display hide1/5.0} OK "$modlin\n$mpre/hide1/5.0:\n\n[err_accessnearlydenied $tomorrow]\nmodule-whatis\thide1/5.0\n$modlin"
 testouterr_cmd_re sh {whatis hide1/5.0} OK "$modlin $mpre $modlin\n\\s+hide1/5.0: hide1/5.0"
 testouterr_cmd sh {avail -t hide1/5.0} OK "$mp:\nhide1/5.0 <nF>"
@@ -767,32 +767,32 @@ lappend ans [list set __MODULES_LMALTNAME hide1/5.0&as|hide1/latest]
 lappend ans [list set _LMFILES_ $mp/hide1/5.0]
 lappend ans [list set LOADEDMODULES hide1/5.0]
 lappend ans [list set __MODULES_LMTAG hide1/5.0&nearly-forbidden]
-testouterr_cmd sh {load hide1/5.0} $ans [msg_load hide1/5.0 [err_accessnearlydenied $tomorrow]]
+testouterr_cmd sh {load hide1/5.0} $ans [msg_load {hide1/5.0 <nF>} [err_accessnearlydenied $tomorrow]]
 unsetenv_var TESTSUITE_FORBID1_NEARLY_SET2
 
 setenv_var TESTSUITE_FORBID1_NEARLY_SET3 1
 set tomorrow [clock format [expr {[clock seconds]+86400}] -format %Y-%m-%d]
-testouterr_cmd sh {load hide1/5.0} $ans [msg_load hide1/5.0 [err_accessnearlydenied $tomorrow "Lorem ipsum dolor sit amet, consectetur adipiscing elit.\nSed non risus. Suspendisse lectus tortor, dignissim sit amet,\nadipiscing nec, ultricies sed, dolor.\n  Cras elementum ultrices diam. Maecenas ligula massa, varius a, semper congue, euismod non, mi."]]
+testouterr_cmd sh {load hide1/5.0} $ans [msg_load {hide1/5.0 <nF>} [err_accessnearlydenied $tomorrow "Lorem ipsum dolor sit amet, consectetur adipiscing elit.\nSed non risus. Suspendisse lectus tortor, dignissim sit amet,\nadipiscing nec, ultricies sed, dolor.\n  Cras elementum ultrices diam. Maecenas ligula massa, varius a, semper congue, euismod non, mi."]]
 unsetenv_var TESTSUITE_FORBID1_NEARLY_SET3
 
 setenv_var TESTSUITE_FORBID1_NEARLY_SET4 1
 set tomorrow [clock format [expr {[clock seconds]+86400}] -format %Y-%m-%d]
-testouterr_cmd sh {load hide1/5.0} $ans [msg_load hide1/5.0 [err_accessnearlydenied $tomorrow {Lorem ipsum dolor sit amet, consectetur adipiscing elit.}]]
+testouterr_cmd sh {load hide1/5.0} $ans [msg_load {hide1/5.0 <nF>} [err_accessnearlydenied $tomorrow {Lorem ipsum dolor sit amet, consectetur adipiscing elit.}]]
 unsetenv_var TESTSUITE_FORBID1_NEARLY_SET4
 
 setenv_var TESTSUITE_FORBID1_NEARLY_SET5 1
 set tomorrow [clock format [expr {[clock seconds]+86400}] -format %Y-%m-%d]
-testouterr_cmd sh {load hide1/5.0} $ans [msg_load hide1/5.0 [err_accessnearlydenied $tomorrow]]
+testouterr_cmd sh {load hide1/5.0} $ans [msg_load {hide1/5.0 <nF>} [err_accessnearlydenied $tomorrow]]
 unsetenv_var TESTSUITE_FORBID1_NEARLY_SET5
 
 setenv_var TESTSUITE_FORBID1_NEARLY_SET6 1
 set tomorrow [clock format [expr {[clock seconds]+86400}] -format %Y-%m-%d]
-testouterr_cmd sh {load hide1/5.0} $ans [msg_load hide1/5.0 [err_accessnearlydenied $tomorrow]]
+testouterr_cmd sh {load hide1/5.0} $ans [msg_load {hide1/5.0 <nF>} [err_accessnearlydenied $tomorrow]]
 unsetenv_var TESTSUITE_FORBID1_NEARLY_SET6
 
 setenv_var TESTSUITE_FORBID1_NEARLY_SET7 1
 set tomorrow [clock format [expr {[clock seconds]+86400}] -format %Y-%m-%d]
-testouterr_cmd sh {load hide1/5.0} $ans [msg_load hide1/5.0 [err_accessnearlydenied $tomorrow {Lorem ipsum dolor sit amet, consectetur adipiscing elit.}]]
+testouterr_cmd sh {load hide1/5.0} $ans [msg_load {hide1/5.0 <nF>} [err_accessnearlydenied $tomorrow {Lorem ipsum dolor sit amet, consectetur adipiscing elit.}]]
 unsetenv_var TESTSUITE_FORBID1_NEARLY_SET7
 
 # --nearly-message specification error
@@ -823,7 +823,7 @@ unsetenv_var TESTSUITE_FORBID1_NEARLY_ERR1
 setenv_var TESTSUITE_FORBID1_NEARLY_SET4 1
 if {$install_nearlyforbiddendays >= 1} {
     set tomorrow [clock format [expr {[clock seconds]+86400}] -format %Y-%m-%d]
-    set tserr [msg_load hide1/5.0 [err_accessnearlydenied $tomorrow {Lorem ipsum dolor sit amet, consectetur adipiscing elit.}]]
+    set tserr [msg_load {hide1/5.0 <nF>} [err_accessnearlydenied $tomorrow {Lorem ipsum dolor sit amet, consectetur adipiscing elit.}]]
 } else {
     set tserr {}
 }

testsuite/modules.20-locate/118-hidden-loaded.exp

@@ -178,9 +178,9 @@ testouterr_cmd_re sh {load hide3/1.0 hidereq/4.1} $ans $no_loaded
 
 # ensure hidden state is recovered and hidden mod load is not reported if automatically triggered
 # on collection restore
-testouterr_cmd_re sh {restore testsuite/home/coll-hide-once-loaded} $ans "Loading hide3/1.0\n$no_loaded\nLoading hidereq/4.1"
+testouterr_cmd_re sh {restore testsuite/home/coll-hide-once-loaded} $ans "Loading hide3/1.0 <H>\n$no_loaded\nLoading hidereq/4.1"
 # unless verbose2 level activated
-testouterr_cmd_re sh {restore -v -v testsuite/home/coll-hide-once-loaded} $ans "Loading hide3/1.0\n$no_loaded\nLoading hidereq/4.1"
+testouterr_cmd_re sh {restore -v -v testsuite/home/coll-hide-once-loaded} $ans "Loading hide3/1.0 <H>\n$no_loaded\nLoading hidereq/4.1"
 set ans [list]
 lappend ans [list set __MODULES_LMALTNAME hide3/1.0&as|hide3/default&as|hide3/latest]
 lappend ans [list set _LMFILES_ $mp/hide3/1.0:$mp/hidereq/4.1]
@@ -189,15 +189,15 @@ lappend ans [list set __MODULES_LMTAG hide3/1.0&auto-loaded&hidden-loaded]
 testouterr_cmd_re sh {restore testsuite/home/coll-hide-once-loaded-nuasked} $ans "$no_loaded\nLoading hidereq/4.1"
 setenv_var MODULES_VERBOSITY verbose
 testouterr_cmd_re sh {restore testsuite/home/coll-hide-once-loaded-nuasked} $ans "$no_loaded\nLoading hidereq/4.1"
-testouterr_cmd_re sh {restore -v -v testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0\n$no_loaded\nLoading hidereq/4.1"
+testouterr_cmd_re sh {restore -v -v testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0 <aL:H>\n$no_loaded\nLoading hidereq/4.1"
 setenv_var MODULES_VERBOSITY verbose2
 testouterr_cmd_re sh {restore -v testsuite/home/coll-hide-once-loaded-nuasked} $ans "$no_loaded\nLoading hidereq/4.1"
-testouterr_cmd_re sh {restore testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0\n$no_loaded\nLoading hidereq/4.1"
-testouterr_cmd_re sh {restore -v -v testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0\n$no_loaded\nLoading hidereq/4.1"
+testouterr_cmd_re sh {restore testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0 <aL:H>\n$no_loaded\nLoading hidereq/4.1"
+testouterr_cmd_re sh {restore -v -v testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0 <aL:H>\n$no_loaded\nLoading hidereq/4.1"
 setenv_var MODULES_VERBOSITY normal
-testouterr_cmd_re sh {restore -v -v testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0\n$no_loaded\nLoading hidereq/4.1"
-testouterr_cmd_re sh {restore -vv testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0\n$no_loaded\nLoading hidereq/4.1"
-testouterr_cmd_re sh {--verbose restore --verbose testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0\n$no_loaded\nLoading hidereq/4.1"
+testouterr_cmd_re sh {restore -v -v testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0 <aL:H>\n$no_loaded\nLoading hidereq/4.1"
+testouterr_cmd_re sh {restore -vv testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0 <aL:H>\n$no_loaded\nLoading hidereq/4.1"
+testouterr_cmd_re sh {--verbose restore --verbose testsuite/home/coll-hide-once-loaded-nuasked} $ans "Loading hide3/1.0 <aL:H>\n$no_loaded\nLoading hidereq/4.1"
 
 # on scriptfile source
 # work on scriptfile located in current dir to cope with the relative path definition set in it
@@ -208,8 +208,8 @@ lappend ans [list set _LMFILES_ $mp/hide3/1.0:$mp/hidereq/4.1]
 lappend ans [list set LOADEDMODULES hide3/1.0:hidereq/4.1]
 lappend ans [list set __MODULES_LMTAG hide3/1.0&hidden-loaded]
 lappend ans [list set MODULEPATH $mp]
-testouterr_cmd_re sh {source coll-hide-once-loaded} $ans "Loading hide3/1.0\n$no_loaded\nLoading hidereq/4.1"
-testouterr_cmd_re sh {source -vv coll-hide-once-loaded} $ans "Loading hide3/1.0\n$no_loaded\nLoading hidereq/4.1"
+testouterr_cmd_re sh {source coll-hide-once-loaded} $ans "Loading hide3/1.0 <H>\n$no_loaded\nLoading hidereq/4.1"
+testouterr_cmd_re sh {source -vv coll-hide-once-loaded} $ans "Loading hide3/1.0 <H>\n$no_loaded\nLoading hidereq/4.1"
 file delete coll-hide-once-loaded
 set ans [list]
 lappend ans [list set __MODULES_LMALTNAME hide3/1.0&as|hide3/default&as|hide3/latest]
@@ -221,10 +221,10 @@ testouterr_cmd_re sh {source testsuite/modulefiles.2/hidereq/4.3} $ans "Loading
 setenv_var MODULES_VERBOSITY verbose
 testouterr_cmd_re sh {source testsuite/modulefiles.2/hidereq/4.3} $ans "Loading hidereq/4.2"
 setenv_var MODULES_VERBOSITY verbose2
-testouterr_cmd_re sh {source testsuite/modulefiles.2/hidereq/4.3} $ans [msg_load hide3/1.0]\n\n[msg_top_load hidereq/4.2 {} hide3/1.0 {}]
+testouterr_cmd_re sh {source testsuite/modulefiles.2/hidereq/4.3} $ans [msg_load {hide3/1.0 <aL:H>} ]\n\n[msg_top_load hidereq/4.2 {} hide3/1.0 {}]
 setenv_var MODULES_VERBOSITY normal
-testouterr_cmd_re sh {source -vv testsuite/modulefiles.2/hidereq/4.3} $ans [msg_load hide3/1.0]\n\n[msg_top_load hidereq/4.2 {} hide3/1.0 {}]
-testouterr_cmd_re sh {source -v -v testsuite/modulefiles.2/hidereq/4.3} $ans [msg_load hide3/1.0]\n\n[msg_top_load hidereq/4.2 {} hide3/1.0 {}]
+testouterr_cmd_re sh {source -vv testsuite/modulefiles.2/hidereq/4.3} $ans [msg_load {hide3/1.0 <aL:H>}]\n\n[msg_top_load hidereq/4.2 {} hide3/1.0 {}]
+testouterr_cmd_re sh {source -v -v testsuite/modulefiles.2/hidereq/4.3} $ans [msg_load {hide3/1.0 <aL:H>}]\n\n[msg_top_load hidereq/4.2 {} hide3/1.0 {}]
 
 
 #

testsuite/modules.20-locate/119-hide-cascading.exp

@@ -279,7 +279,7 @@ lappend ans2 [list set __MODULES_LMALTNAME hide1/5.0&as|hide1/latest]
 lappend ans2 [list set _LMFILES_ $mp/hide1/5.0]
 lappend ans2 [list set LOADEDMODULES hide1/5.0]
 lappend ans2 [list set __MODULES_LMTAG hide1/5.0&nearly-forbidden]
-testouterr_cmd sh {load [email protected]} $ans2 [msg_load hide1/5.0 [err_accessnearlydenied [clock format [expr {[clock seconds]+86400}] -format %Y-%m-%d]]]
+testouterr_cmd sh {load [email protected]} $ans2 [msg_load {hide1/5.0 <nF>} [err_accessnearlydenied [clock format [expr {[clock seconds]+86400}] -format %Y-%m-%d]]]
 testouterr_cmd sh {avail -t [email protected]} OK "$mp:\nhide1/5.0 <nF>"
 unsetenv_var TESTSUITE_HIDE1_CASC6_SET3
 

testsuite/modules.50-cmds/078-refresh.exp

@@ -149,7 +149,7 @@ lappend ans [list out {echo refresh/2.0}]
 testouterr_cmd sh {refresh} $ans {}
 
 # verbose output mode
-set tserr2 [msg_refresh refresh/1.0]\n[msg_refresh refresh/2.0{+foo}]
+set tserr2 [msg_refresh refresh/1.0]\n[msg_refresh {refresh/2.0{+foo} <bar>}]
 testouterr_cmd sh {refresh -v} $ans $tserr2
 
 # verbose output and hidden-loaded module
@@ -168,6 +168,7 @@ lappend ans [list alias alisloaded1 {echo is-loaded ok}]
 lappend ans [list funcfoo "() {" "echo foo2; };"]
 lappend ans [list out {echo refresh/1.0}]
 lappend ans [list out {echo refresh/2.0}]
+set tserr2 [msg_refresh refresh/1.0]\n[msg_refresh {refresh/2.0{+foo} <bar:H>}]
 testouterr_cmd sh {refresh -v} $ans $tserr2
 
 # verbose output and hidden-loaded module
@@ -186,9 +187,11 @@ lappend ans [list funcfoo "() {" "echo foo2; };"]
 lappend ans [list out {echo refresh/1.0}]
 lappend ans [list out {echo refresh/2.0}]
 testouterr_cmd sh {refresh -v} $ans $tserr1
+set tserr2 [msg_refresh refresh/1.0]\n[msg_refresh {refresh/2.0{+foo} <aL:bar:H>}]
 testouterr_cmd sh {refresh -vv} $ans $tserr2
 setenv_var __MODULES_LMTAG refresh/1.0&hidden-loaded&auto-loaded:refresh/2.0&bar&hidden-loaded&auto-loaded
 testouterr_cmd sh {refresh -v} $ans {}
+set tserr2 [msg_refresh {refresh/1.0 <aL:H>}]\n[msg_refresh {refresh/2.0{+foo} <aL:bar:H>}]
 testouterr_cmd sh {refresh -vv} $ans $tserr2
 unsetenv_var __MODULES_LMTAG
 
@@ -230,10 +233,10 @@ lappend ans1 [list ERR]
 testouterr_cmd sh {refresh} $ans1 [msg_refresh refresh/1.0 $err_evalabort]
 
 # verbose output
-testouterr_cmd sh {refresh -v} $ans1 [msg_refresh refresh/1.0 $err_evalabort]\n\n[msg_refresh refresh/2.0{+foo}]
+testouterr_cmd sh {refresh -v} $ans1 [msg_refresh refresh/1.0 $err_evalabort]\n\n[msg_refresh {refresh/2.0{+foo} <bar>}]
 # hidden-loaded/auto-loaded
 setenv_var __MODULES_LMTAG refresh/1.0&bar&hidden-loaded&auto-loaded:refresh/2.0&bar
-set tserr [msg_refresh refresh/1.0 $err_evalabort]
+set tserr [msg_refresh {refresh/1.0 <aL:bar:H>} $err_evalabort]
 testouterr_cmd sh {refresh} $ans1 $tserr
 setenv_var __MODULES_LMTAG refresh/2.0&bar
 
@@ -252,12 +255,12 @@ lappend ans2 [list alias almode {echo refresh}]
 lappend ans2 [list funcfoo "() {" "echo foo1; };"]
 lappend ans2 [list out {echo refresh/1.0}]
 lappend ans2 [list ERR]
-set tserr [msg_refresh refresh/2.0{+foo} $err_evalabort]
+set tserr [msg_refresh {refresh/2.0{+foo} <bar>} $err_evalabort]
 testouterr_cmd sh {refresh} $ans2 $tserr
 
 # break in both loaded modules
 setenv_var TESTSUITE_REFRESH break0
-testouterr_cmd sh {refresh} ERR [msg_refresh refresh/1.0 $err_evalabort]\n\n[msg_refresh refresh/2.0{+foo} $err_evalabort]
+testouterr_cmd sh {refresh} ERR [msg_refresh refresh/1.0 $err_evalabort]\n\n[msg_refresh {refresh/2.0{+foo} <bar>} $err_evalabort]
 
 # unknown command
 setenv_var TESTSUITE_REFRESH badcmd1
@@ -290,7 +293,7 @@ if {[cmpversion $tclsh_version 8.6] == -1} {
     set custom {}
     set linenum 19
 }
-set tserr [msg_refresh refresh/2.0{+foo} [msg_moderr {invalid command name "unk"} {unk} $mp/refresh/2.0 $linenum {} {} {} $custom]]
+set tserr [msg_refresh {refresh/2.0{+foo} <bar>} [msg_moderr {invalid command name "unk"} {unk} $mp/refresh/2.0 $linenum {} {} {} $custom]]
 testouterr_cmd sh {refresh} $ans2 $tserr
 
 # continue command
@@ -323,15 +326,15 @@ lappend ans [list out {echo refresh/1.0}]
 testouterr_cmd sh {refresh} $ans {}
 
 # verbose output
-set tserr [msg_refresh refresh/1.0]\n[msg_refresh refresh/2.0{+foo}]
+set tserr [msg_refresh refresh/1.0]\n[msg_refresh {refresh/2.0{+foo} <bar>}]
 testouterr_cmd sh {refresh -v} $ans $tserr
 
 # exit command
 setenv_var TESTSUITE_REFRESH exit1
 set tserr [msg_refresh refresh/1.0 $err_evalabort]
 testouterr_cmd sh {refresh} ERR $tserr
 setenv_var TESTSUITE_REFRESH exit2
-set tserr [msg_refresh refresh/2.0{+foo} $err_evalabort]
+set tserr [msg_refresh {refresh/2.0{+foo} <bar>} $err_evalabort]
 testouterr_cmd sh {refresh} $ans2 $tserr
 
 

testsuite/modules.50-cmds/120-prereq-full.exp

@@ -50,8 +50,9 @@ set modulefile_troff "$modpath/$module_troff"
 set err_pre [msg_load $module [err_prereq "trace/all_on"]]
 set err_trace "$warn_msgs: 'module-trace' command not implemented"
 
-set msg_load_tron [msg_load $module_tron $err_trace]
-set msg_unload_tron [msg_unload $module_tron $err_trace]
+set msg_load_tron [msg_load "$module_tron <aL>" $err_trace]
+set msg_load_tron_noal [msg_load $module_tron $err_trace]
+set msg_unload_tron [msg_unload "$module_tron <aL>" $err_trace]
 set msg_top_load_module [msg_top_load $module {} $module_tron {}]
 set msg_top_unload_module [msg_top_unload $module {} $module_tron {}]
 set msg_top_switch_module [msg_top_switch $module $module {} {} {} $module_tron {}]
@@ -96,7 +97,7 @@ lappend ans [list set __MODULES_LMPREREQ "$module&$module_tron"]
 lappend ans [list set testsuite yes]
 lappend ans [list set _LMFILES_ "$modulefile_tron:$modulefile"]
 lappend ans [list set LOADEDMODULES "$module_tron:$module"]
-testouterr_cmd_re "ALL" "load $module_tron $module" $ans $msg_load_tron
+testouterr_cmd_re "ALL" "load $module_tron $module" $ans $msg_load_tron_noal
 
 
 # test situations where auto_handling is disabled and some constraints are unsatisfied
@@ -156,11 +157,11 @@ setenv_loaded_module [list $module] [list $modulefile]
 set ans [list]
 lappend ans [list set _LMFILES_ "$modulefile:$modulefile_tron"]
 lappend ans [list set LOADEDMODULES "$module:$module_tron"]
-testouterr_cmd_re "sh" "load --no-auto $module_tron" $ans $msg_load_tron
+testouterr_cmd_re "sh" "load --no-auto $module_tron" $ans $msg_load_tron_noal
 
 # switch sub-command should obtain same result here
-testouterr_cmd_re "sh" "switch --no-auto $module_tron" $ans $msg_load_tron
-testouterr_cmd_re "sh" "switch --no-auto --force $module_tron" $ans $msg_load_tron
+testouterr_cmd_re "sh" "switch --no-auto $module_tron" $ans $msg_load_tron_noal
+testouterr_cmd_re "sh" "switch --no-auto --force $module_tron" $ans $msg_load_tron_noal
 
 # in auto mode, requiring module is reloaded
 set ans [list]