Fix false fail, caused by r9907 tidyup to not bother initializing clases
Tomas Doran [Tue, 28 Apr 2009 17:41:26 +0000 (17:41 +0000)]
which don't match ^MyApp - ergo calling Catalyst->setup_component no longer
triggered the behavior to fix things up, as MyApp::Controller::Anything does
not match ^Catalyst..

t/unit_metaclass_compat_non_moose_controller.t

index d2a61d9..cb3c1e2 100644 (file)
@@ -1,6 +1,10 @@
 use Catalyst ();
 
 {
+    package TestApp;
+    use base qw/Catalyst/;
+}
+{
     package TestApp::Controller::Base;
     use base qw/Catalyst::Controller/;
 }
@@ -9,8 +13,8 @@ use Catalyst ();
     use base qw/TestApp::Controller::Base/;
 }
 
-Catalyst->setup_component('TestApp::Controller::Other');
-Catalyst->setup_component('TestApp::Controller::Base');
+TestApp->setup_component('TestApp::Controller::Other');
+TestApp->setup_component('TestApp::Controller::Base');
 
 use Test::More tests => 1;
 use Test::Exception;