From 182b1787ae64f63a0f5287d2a6795f5ba29992f3 Mon Sep 17 00:00:00 2001
From: Jed Reynolds <jed@candelatech.com>
Date: Mon, 25 Nov 2019 23:24:17 -0800
Subject: [PATCH] small updates

---
 LANforge/Test.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/LANforge/Test.pm b/LANforge/Test.pm
index 94fcc6a7..ef4b3099 100644
--- a/LANforge/Test.pm
+++ b/LANforge/Test.pm
@@ -52,11 +52,13 @@ sub new {
 }
 
 sub run {
+  plan(1);
   my $self = shift;
   print "Run $self->{Name}\n";
   my $result = shift;
   
   ok($result, $self->{'Name'}) || fail($self->{'Name'});
+  done_testing();
 }
 
 sub test {
@@ -71,7 +73,7 @@ sub test_err {
   my $self = shift;
   for my $e (@_) {
     my $ref = "".(caller(1))[3].":".(caller(1))[2]."";
-    push (@test_errors, "$ref: $e");
+    push (@::test_errors, "$ref: $e");
   }
 }
 1;
\ No newline at end of file