[Catalyst-commits] r11068 - Catalyst-Runtime/5.80/trunk/t

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-08-09 12:36:20 +0000 (Sun, 09 Aug 2009)
New Revision: 11068

Modified:
   Catalyst-Runtime/5.80/trunk/t/unit_core_setup.t
   Catalyst-Runtime/5.80/trunk/t/unit_core_setup_stats.t
Log:
Fix RT#48555

Modified: Catalyst-Runtime/5.80/trunk/t/unit_core_setup.t
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/unit_core_setup.t	2009-08-09 02:38:29 UTC (rev 11067)
+++ Catalyst-Runtime/5.80/trunk/t/unit_core_setup.t	2009-08-09 12:36:20 UTC (rev 11068)
@@ -26,6 +26,10 @@
     return $name;
 }
 
+build_test_app_with_setup('UnusedApp'); # Mock an app before localizing %ENV
+                                  # to ensure that anything which is dynamically
+                                  # loaded from the enviornment is loaded
+
 local %ENV; # Don't allow env variables to mess us up.
 
 {

Modified: Catalyst-Runtime/5.80/trunk/t/unit_core_setup_stats.t
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/unit_core_setup_stats.t	2009-08-09 02:38:29 UTC (rev 11067)
+++ Catalyst-Runtime/5.80/trunk/t/unit_core_setup_stats.t	2009-08-09 12:36:20 UTC (rev 11068)
@@ -29,6 +29,10 @@
     return $meta->name;
 }
 
+mock_app('UnusedApp'); # Mock an app before localizing %ENV
+                       # to ensure that anything which is dynamically
+                       # loaded from the enviornment is loaded
+
 local %ENV; # Ensure blank or someone, somewhere will fail..
 
 {