Perl unit tests: Define "constants" as package vars in BaseTestCase

This will allow their use in tests.
rpm-software-management · Dec 10, 2024 · ab8da09 · ab8da09
1 parent fd199fe
commit ab8da09
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/test/perl5/libdnf5/BaseTestCase.pm b/test/perl5/libdnf5/BaseTestCase.pm
@@ -27,8 +27,8 @@ use libdnf5::base;
 use libdnf5::repo;
 
 
-my $PROJECT_BINARY_DIR = $ENV{"PROJECT_BINARY_DIR"};
-my $PROJECT_SOURCE_DIR = $ENV{"PROJECT_SOURCE_DIR"};
+our $PROJECT_BINARY_DIR = $ENV{"PROJECT_BINARY_DIR"};
+our $PROJECT_SOURCE_DIR = $ENV{"PROJECT_SOURCE_DIR"};
 
 sub new {
     my $class = shift;