adapt TestAppCustomContainer, not to break everything while it's not ready
André Walker [Wed, 3 Aug 2011 03:51:56 +0000 (00:51 -0300)]
t/lib/TestAppCustomContainer.pm
t/lib/TestAppCustomContainer/Controller/Root.pm
t/lib/TestAppCustomContainer/NoSugarContainer.pm
t/lib/TestAppCustomContainer/SugarContainer.pm

index eb57069..a70d3f0 100644 (file)
@@ -4,6 +4,10 @@ use Catalyst;
 extends 'Catalyst';
 use namespace::autoclean;
 
+__PACKAGE__->config(
+    container_class => $ENV{TEST_APP_CURRENT_CONTAINER}
+) if $ENV{TEST_APP_CURRENT_CONTAINER};
+
 __PACKAGE__->setup;
 
 1;
index 891a63a..f4b973a 100644 (file)
@@ -2,6 +2,18 @@ package TestAppCustomContainer::Controller::Root;
 use Moose;
 BEGIN { extends 'Catalyst::Controller' }
 
+__PACKAGE__->config(namespace => '');
+
+sub container_class :Local {
+    my ($self, $c) = @_;
+    $c->res->body($c->config->{container_class});
+}
+
+sub container_isa :Local {
+    my ($self, $c) = @_;
+    $c->res->body(ref $c->container);
+}
+
 __PACKAGE__->meta->make_immutable;
 no Moose;
 1;
index 8fb17eb..d9f3c68 100644 (file)
@@ -11,7 +11,7 @@ sub BUILD {
         Catalyst::IOC::ConstructorInjection->new(
             name         => 'model_Baz',
             class        => 'TestAppCustomContainer::Model::Baz',
-            lifecycle    => 'InstancePerContext',
+#            lifecycle    => 'InstancePerContext',
             dependencies => [
                 depends_on( '/application_name' ),
                 depends_on( '/config' ),
index 39e0c07..5643886 100644 (file)
@@ -12,7 +12,7 @@ sub BUILD {
         Catalyst::IOC::ConstructorInjection->new(
             name         => 'model_Baz',
             class        => 'TestAppCustomContainer::Model::Baz',
-            lifecycle    => 'InstancePerContext',
+#            lifecycle    => 'InstancePerContext',
             dependencies => [
                 depends_on( '/application_name' ),
                 depends_on( '/config' ),