X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FIOC%2FContainer.pm;h=b89fd9669ee1e25b15191f6881eec2514239adb6;hp=fbc1a7ddfa915814119cdd3c9fbdaa6c4cdeaf83;hb=8c199f8627c2d972d06aa0a98337ff7ba922d9af;hpb=1601aed5f75e09f1190a3f9a16cdd32df11834d1

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;