Fixed setup_components to accept Catalyst::Component subclasses
Sebastian Riedel [Sun, 6 Nov 2005 19:53:24 +0000 (19:53 +0000)]
lib/Catalyst.pm

index 702bd8a..cb09a24 100644 (file)
@@ -1346,7 +1346,7 @@ sub setup_components {
     my $callback = sub {
         my ( $component, $context ) = @_;
 
-        unless ( $component->isa('Catalyst::Base') ) {
+        unless ( $component->isa('Catalyst::Component') ) {
             return $component;
         }