clean up environment in tests to avoid outside interference

[catagits/Catalyst-Plugin-ConfigLoader.git] / t / 24-mock-shortappname.t

diff --git a/t/24-mock-shortappname.t b/t/24-mock-shortappname.t
index f7abc17..2759d2a 100644 (file)
--- a/t/24-mock-shortappname.t
+++ b/t/24-mock-shortappname.t
@@ -2,6 +2,13 @@ use strict;
 use warnings;
 use Test::More;
 
+BEGIN {
+    # Remove all relevant env variables to avoid accidental fail
+    foreach my $name ( grep { m{^(CATALYST)} } keys %ENV ) {
+        delete $ENV{ $name };
+    }
+}
+
 {
     package QX;
     use strict;