ts: extra spec search with same mod in several modpath in 51/040

Author: xdelaruelle

.hunspell.en.dic

@@ -1137,3 +1137,4 @@ boolvar
 foss21a
 othervariant
 bitwise
+modpath

testsuite/modulefiles.3/foo/1.0

@@ -20,3 +20,11 @@ if {[info exists env(TESTSUITE_OPTIONAL_OPT)]} {
         }
     }
 }
+
+if {[info exists env(TESTSUITE_EXTRA)]} {
+    switch -- $env(TESTSUITE_EXTRA) {
+        dup11 - dup12 {
+            setenv XTFOODUP value
+        }
+    }
+}

testsuite/modulefiles.4/foo/1.0

@@ -1 +1,8 @@
 #%Module
+if {[info exists env(TESTSUITE_EXTRA)]} {
+    switch -- $env(TESTSUITE_EXTRA) {
+        dup10 - dup11 {
+            setenv XTFOODUP value
+        }
+    }
+}

testsuite/modulefiles.4/xtfoo/1.0

@@ -1 +1,8 @@
 #%Module
+if {[info exists env(TESTSUITE_EXTRA)]} {
+    switch -- $env(TESTSUITE_EXTRA) {
+        dup12 {
+            setenv XTFOODUP value
+        }
+    }
+}

testsuite/modules.51-scan/040-extra_spec.exp

@@ -203,6 +203,57 @@ testouterr_cmd sh {list extra/1.0 variant:xtfoo} ERR $tserr
 unsetenv_loaded_module
 
 
+#
+# multiple modulepaths
+#
+
+setenv_var MODULES_AVAIL_TERSE_OUTPUT dir
+setenv_var MODULES_SEARCH_MATCH starts_with
+
+setenv_var TESTSUITE_EXTRA dup10
+
+setenv_path_var MODULEPATH $modpath.3:$mp
+set tserr "$mp:\nfoo/1.0"
+testouterr_cmd sh {avail -t setenv:XTFOODUP} OK $tserr
+testouterr_cmd sh {avail -t foo setenv:XTFOODUP} OK $tserr
+
+setenv_path_var MODULEPATH $mp:$modpath.3
+testouterr_cmd sh {avail -t setenv:XTFOODUP} OK $tserr
+testouterr_cmd sh {avail -t foo setenv:XTFOODUP} OK $tserr
+
+
+setenv_var TESTSUITE_EXTRA dup11
+
+setenv_path_var MODULEPATH $modpath.3:$mp
+set tserr "$modpath.3:\nfoo/1.0\n\n$mp:\nfoo/1.0"
+testouterr_cmd sh {avail -t setenv:XTFOODUP} OK $tserr
+testouterr_cmd sh {avail -t foo setenv:XTFOODUP} OK $tserr
+
+setenv_path_var MODULEPATH $mp:$modpath.3
+set tserr "$mp:\nfoo/1.0\n\n$modpath.3:\nfoo/1.0"
+testouterr_cmd sh {avail -t setenv:XTFOODUP} OK $tserr
+testouterr_cmd sh {avail -t foo setenv:XTFOODUP} OK $tserr
+
+
+setenv_var TESTSUITE_EXTRA dup12
+
+setenv_path_var MODULEPATH $modpath.3:$mp
+set tserr "$modpath.3:\nfoo/1.0\n\n$mp:\nxtfoo/1.0"
+testouterr_cmd sh {avail -t setenv:XTFOODUP} OK $tserr
+
+set tserr "$modpath.3:\nfoo/1.0"
+testouterr_cmd sh {avail -t foo setenv:XTFOODUP} OK $tserr
+
+setenv_path_var MODULEPATH $mp:$modpath.3
+set tserr "$mp:\nxtfoo/1.0\n\n$modpath.3:\nfoo/1.0"
+testouterr_cmd sh {avail -t setenv:XTFOODUP} OK $tserr
+
+set tserr "$modpath.3:\nfoo/1.0"
+testouterr_cmd sh {avail -t foo setenv:XTFOODUP} OK $tserr
+
+unsetenv_var MODULES_SEARCH_MATCH
+
+
 #
 #  Cleanup
 #