From d68cdac2ae12e1a9ce9fb1e2608a67dcbf924e8f Mon Sep 17 00:00:00 2001
From: Robert McLay <mclay@zaniahgroup.com>
Date: Mon, 4 Nov 2024 11:58:24 -0600
Subject: [PATCH] Issue #690: updating busted tests to know about MRC display
 mode

---
 spec/LocationT/LocationT_spec.lua     | 4 ++++
 spec/MName/MName_spec.lua             | 3 +++
 spec/MRC/MRC_spec.lua                 | 3 +++
 spec/MainControl/MainControl_spec.lua | 4 ++++
 spec/ModuleA/ModuleA_spec.lua         | 3 +++
 spec/Spider/Spider_spec.lua           | 3 +++
 6 files changed, 20 insertions(+)

diff --git a/spec/LocationT/LocationT_spec.lua b/spec/LocationT/LocationT_spec.lua
index 82e258df8..b32b040cc 100644
--- a/spec/LocationT/LocationT_spec.lua
+++ b/spec/LocationT/LocationT_spec.lua
@@ -10,12 +10,16 @@ _G.MainControl   = require("MainControl")
 local DirTree    = require("DirTree")
 local ModuleA    = require("ModuleA")
 local LocationT  = require("LocationT")
+local MRC        = require("MRC")
 local concatTbl  = table.concat
 local cosmic     = require("Cosmic"):singleton()
 local getenv     = os.getenv
 local testDir    = "spec/LocationT"
 
 setenv_lmod_version()
+local mrc = MRC:singleton()
+mrc:set_display_mode("spider")
+cosmic:assign("LMOD_SHOW_HIDDEN","no")
 describe("Testing LocationT Class #LocationT.",
          function()
             it("build locationT and compare",
diff --git a/spec/MName/MName_spec.lua b/spec/MName/MName_spec.lua
index 1761bc7d4..009a52acd 100644
--- a/spec/MName/MName_spec.lua
+++ b/spec/MName/MName_spec.lua
@@ -9,6 +9,7 @@ require("fileOps")
 
 local MName     = require("MName")
 local ModuleA   = require("ModuleA")
+local mrc       = require("MRC"):singleton()
 local FrameStk  = require("FrameStk")
 
 local concatTbl = table.concat
@@ -16,6 +17,8 @@ local cosmic    = require("Cosmic"):singleton()
 local dbg       = require("Dbg"):dbg()
 local testDir   = "spec/MName"
 setenv_lmod_version()
+mrc:set_display_mode("spider")
+cosmic:assign("LMOD_SHOW_HIDDEN","no")
 describe("Testing MName Class #MName.",
          function()
             it("Test finding modules with NVV files",
diff --git a/spec/MRC/MRC_spec.lua b/spec/MRC/MRC_spec.lua
index 8fe3a260a..0c96e750b 100644
--- a/spec/MRC/MRC_spec.lua
+++ b/spec/MRC/MRC_spec.lua
@@ -15,6 +15,9 @@ local cosmic     = require("Cosmic"):singleton()
 local dbg        = require("Dbg"):dbg()
 local testDir    = "spec/MRC"
 setenv_lmod_version()
+local mrc       = MRC:singleton()
+mrc:set_display_mode("spider")
+cosmic:assign("LMOD_SHOW_HIDDEN","no")
 
 describe("Testing MRC class #MRC.",
          function()
diff --git a/spec/MainControl/MainControl_spec.lua b/spec/MainControl/MainControl_spec.lua
index 1b1179e69..2c5d31ed6 100644
--- a/spec/MainControl/MainControl_spec.lua
+++ b/spec/MainControl/MainControl_spec.lua
@@ -17,7 +17,11 @@ local ModuleA       = require("ModuleA")
 local cosmic        = require("Cosmic"):singleton()
 local dbg           = require("Dbg")
 local getenv        = os.getenv
+local mrc           = require("MRC"):singleton()
 local testDir       = "spec/MainControl"
+mrc:set_display_mode("spider")
+cosmic:assign("LMOD_SHOW_HIDDEN","no")
+
 
 setenv_lmod_version()
 describe("Testing MainControl Class #MainControl.",
diff --git a/spec/ModuleA/ModuleA_spec.lua b/spec/ModuleA/ModuleA_spec.lua
index 987ff962a..2587e78f7 100644
--- a/spec/ModuleA/ModuleA_spec.lua
+++ b/spec/ModuleA/ModuleA_spec.lua
@@ -15,9 +15,12 @@ local FrameStk   = require("FrameStk")
 local dbg        = require("Dbg"):dbg()
 local concatTbl  = table.concat
 local cosmic     = require("Cosmic"):singleton()
+local mrc        = require("MRC"):singleton()
 local getenv     = os.getenv
 local testDir    = "spec/ModuleA"
 setenv_lmod_version()
+cosmic:assign("LMOD_SHOW_HIDDEN","no")
+mrc:set_display_mode("spider")
 describe("Testing ModuleA Class #ModuleA.",
          function()
             it("Build moduleA from mf",
diff --git a/spec/Spider/Spider_spec.lua b/spec/Spider/Spider_spec.lua
index 2e0271a60..1366d33ad 100644
--- a/spec/Spider/Spider_spec.lua
+++ b/spec/Spider/Spider_spec.lua
@@ -15,8 +15,11 @@ local concatTbl  = table.concat
 local cosmic     = require("Cosmic"):singleton()
 local dbg        = require("Dbg"):dbg()
 local getenv     = os.getenv
+local mrc        = require("MRC"):singleton()
 local testDir    = "spec/Spider"
 setenv_lmod_version()
+mrc:set_display_mode("spider")
+cosmic:assign("LMOD_SHOW_HIDDEN","no")
 describe("Testing Spider Class #Spider.",
          function()
             it("Core directory Test",