From: Will Budic <redacted>
Date: Wed, 11 Mar 2026 00:37:17 +0000 (+1100)
Subject: Resolves our system/modules now, provides globals on compile time.
X-Git-Url: https://lifelog.hopto.org/gitweb/?a=commitdiff_plain;h=37a72f479b51048c695dddd0baa3c3a3ca7312ff;p=PerlCNF.git

Resolves our system/modules now, provides globals on compile time.
---

diff --git a/tests/TestBase.pm b/tests/TestBase.pm
new file mode 100644
index 0000000..35b5e25
--- /dev/null
+++ b/tests/TestBase.pm
@@ -0,0 +1,18 @@
+package TestBase;
+use warnings; use strict;
+use Syntax::Keyword::Try;
+use Cwd qw(abs_path);
+use File::Basename;
+use lib dirname( abs_path(__FILE__) );
+use lib dirname( abs_path(__FILE__) ) . "/../system/modules";
+use TestManager;
+use CNFParser;
+
+
+sub base_path{
+    my $self = shift;
+    return `pwd`
+}
+
+
+1;
\ No newline at end of file