mirror of
https://github.com/envmodules/modules.git
synced 2026-05-30 00:12:31 +08:00
ts: test module-info tags on full path mod in 50/441
This commit is contained in:
@@ -138,5 +138,9 @@ if {[info exists env(TESTSUITE_FPMOD_TAG)]} {
|
||||
hide13 {
|
||||
module-hide --soft --hidden-loaded [file dirname $ModulesCurrentModulefile]/1.0
|
||||
}
|
||||
info1 {
|
||||
module-tag foo [file dirname $ModulesCurrentModulefile]/1.0
|
||||
module-tag bar [file dirname $ModulesCurrentModulefile]/1.0
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
@@ -15,5 +15,9 @@ if {[info exists env(TESTSUITE_FPMOD_TAG)]} {
|
||||
hide4 - hide5 {
|
||||
module-whatis [module-info name]
|
||||
}
|
||||
info1 {
|
||||
setenv FOO [module-info tags]
|
||||
setenv BAR [module-info tags bar]
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
@@ -397,6 +397,22 @@ if {$plus_in_modpath && $install_advversspec eq {y}} {
|
||||
setenv_var MODULERCFILE $ORIG_MODULERCFILE
|
||||
|
||||
|
||||
#
|
||||
# full path tag set and module-info tags queries
|
||||
#
|
||||
|
||||
setenv_var TESTSUITE_FPMOD_TAG info1
|
||||
|
||||
set ans [list]
|
||||
lappend ans [list set FOO {bar foo}]
|
||||
lappend ans [list set BAR 1]
|
||||
lappend ans [list set _LMFILES_ $mp/tag/1.0]
|
||||
lappend ans [list set LOADEDMODULES tag/1.0]
|
||||
lappend ans [list set __MODULES_LMTAG tag/1.0&foo&bar]
|
||||
set tserr [msg_load {tag/1.0 <bar:foo>}]
|
||||
testouterr_cmd sh {load -v tag/1.0} $ans $tserr
|
||||
|
||||
|
||||
#
|
||||
# Cleanup
|
||||
#
|
||||
|
||||
Reference in New Issue
Block a user