Update testing files

Author: eszmw

SoftwareTests/PostSmokeTest.m

@@ -32,7 +32,7 @@ function PostSmokeTest(ShowReport)
 % Format the results in a table and save them
 Results = table(Results');
 Version = extractBetween(string(Results.Name),"Version=",")");
-Passed = Results.Passed;
+Passed = logical(Results.Passed);
 
 % Add link to other report
 File = fileread(fullfile("public","index.html"));
@@ -51,7 +51,7 @@ function PostSmokeTest(ShowReport)
     Badge.message = join("R"+Version," | ");
 elseif any(Passed)
     Badge.color = "yellowgreen";
-    Badge.message = join("R")
+    Badge.message = join("R"+Version(Passed)," | ");
 elseif all(~Passed)
     Badge.color = "critical";
     Badge.message = join("R"+Version," | ");

SoftwareTests/SolnSmokeTests.m

@@ -55,7 +55,7 @@ function SetUpPath(testCase,Project)
             % Check that solutions are on path:
             testCase.isSolnOnPath = isfolder("Solutions");
             if testCase.isSolnOnPath == 0
-                addpath(fullfile(testCase.RootFolder,"InstructorResources","Solutions"))
+                addpath(genpath(fullfile(testCase.RootFolder,"InstructorResources","Solutions")))
             end
 
             % Close the StartUp app if still open:
@@ -163,4 +163,14 @@ function SmokeRun(testCase,File)
 
     end % Private Access Methods
 
+    methods (TestClassTeardown)
+
+        function ResetPath(testCase)
+            if ~testCase.isSolnOnPath && exist("Solutions","dir")
+                rmpath(genpath(fullfile(currentProject().RootFolder,"InstructorResources","Solutions")))
+            end
+        end
+
+    end % TestClassTeardown
+
 end % SolnSmokeTests