X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FDispatcher.pm;h=f63267bfe22e8b21dea4bf254df8b5b2c75f9bf9;hb=9d1f95081b5502041ce6597d67a7aa3c23dc8e08;hp=12040b23654b7e8c798e8125bee52e9311b3b9ec;hpb=0ca510f0aa1cabe138d81897d38111d7b772449c;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Dispatcher.pm b/lib/Catalyst/Dispatcher.pm index 12040b2..f63267b 100644 --- a/lib/Catalyst/Dispatcher.pm +++ b/lib/Catalyst/Dispatcher.pm @@ -614,6 +614,7 @@ sub setup_actions { @{ $self->_registered_dispatch_types }{@classes} = (1) x @classes; foreach my $comp ( values %{ $c->components } ) { + $comp = $comp->() if ref($comp) eq 'CODE'; $comp->register_actions($c) if $comp->can('register_actions'); }