X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F21-mock_load_env.t;h=5cc3ff5ebd8050262a53b8adfd6a1dd65cece514;hb=dbb54194dcca7a1e2e9bab27b66cc202da2f2124;hp=7bdacf669647a91df7cdcb6e10732efe12f047df;hpb=587d381b43681a3529349505abcc351aec54fb01;p=catagits%2FCatalyst-Plugin-ConfigLoader.git

diff --git a/t/21-mock_load_env.t b/t/21-mock_load_env.t
index 7bdacf6..5cc3ff5 100644
--- a/t/21-mock_load_env.t
+++ b/t/21-mock_load_env.t
@@ -1,8 +1,13 @@
 package MockApp;
 
-use Test::More tests => 9;
-
+use Test::More tests => 10;
 use Cwd;
+
+# Remove all relevant env variables to avoid accidental fail
+foreach my $name ( grep { m{^(CATALYST|MOCKAPP)} } keys %ENV ) {
+    delete $ENV{ $name };
+} 
+
 $ENV{ CATALYST_HOME }  = cwd . '/t/mockapp';
 $ENV{ MOCKAPP_CONFIG } = $ENV{ CATALYST_HOME } . '/mockapp.pl';
 
@@ -22,3 +27,4 @@ is( __PACKAGE__->config->{ 'Model::Baz' }->{ another },  'new key' );
 is( __PACKAGE__->config->{ 'view' },                     'View::TT::New' );
 is( __PACKAGE__->config->{ 'foo_sub' },                  'x-y' );
 is( __PACKAGE__->config->{ 'literal_macro' },            '__DATA__' );
+is( __PACKAGE__->config->{ 'environment_macro' },        $ENV{ CATALYST_HOME }.'/mockapp.pl' );