X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Funit_core_component_setup.t;h=f8511e8a07c77652605193cc3d092a1597d4947b;hb=89b6b254a923f245093d323d9f526b891c8c866f;hp=aa0c4fcf620349c93361d2c97757f5a348851797;hpb=78330ec0dbdd06abaa4f77ffb6205b26e57468f8;p=catagits%2FCatalyst-Runtime.git diff --git a/t/aggregate/unit_core_component_setup.t b/t/aggregate/unit_core_component_setup.t index aa0c4fc..f8511e8 100644 --- a/t/aggregate/unit_core_component_setup.t +++ b/t/aggregate/unit_core_component_setup.t @@ -90,18 +90,36 @@ is_deeply( ); is_deeply( + [ sort TestAppComponents->controllers ], + [ sort @controllers ], + 'controllers are listed correctly by $c->controllers()', +); + +is_deeply( [ sort $container->get_sub_container('model')->get_service_list ], [ sort @models ], 'models are in the container', ); is_deeply( + [ sort TestAppComponents->models ], + [ sort @models ], + 'models are listed correctly by $c->models()', +); + +is_deeply( [ sort $container->get_sub_container('view')->get_service_list ], [ sort @views ], 'views are in the container', ); is_deeply( + [ sort TestAppComponents->views ], + [ sort @views ], + 'views are listed correctly by $c->views()', +); + +is_deeply( [ sort keys %{ TestAppComponents->components } ], [ sort @comps ], 'all components are in the components accessor'