X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FIOC%2FContainer.pm;h=b89fd9669ee1e25b15191f6881eec2514239adb6;hb=8c199f8627c2d972d06aa0a98337ff7ba922d9af;hp=fbc1a7ddfa915814119cdd3c9fbdaa6c4cdeaf83;hpb=fb74321b19e50e755b53f7f537de0079ceee9e91;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/IOC/Container.pm b/lib/Catalyst/IOC/Container.pm index fbc1a7d..b89fd96 100644 --- a/lib/Catalyst/IOC/Container.pm +++ b/lib/Catalyst/IOC/Container.pm @@ -681,6 +681,8 @@ sub _find_component_regexp { # user overrides the container (which is what we want), the sub-container they # will use is precisely $type, not 'component'. So for now, I'm returning both # services, to decide later what to do. +# TODO +# add pod, remove code repetition sub get_all_component_services { my $self = shift; @@ -711,6 +713,8 @@ sub get_all_component_services { return lock_hash %components; } +# TODO +# add pod, remove code repetition sub get_all_singleton_lifecycle_components { my $self = shift; @@ -739,6 +743,8 @@ sub get_all_singleton_lifecycle_components { return lock_hash %components; } +# TODO +# remove code repetition sub get_all_components { my ($self, $class) = @_; my %components;