[Catalyst-commits] r9919 - Catalyst-Runtime/5.80/trunk/lib
t0m at dev.catalyst.perl.org
t0m at dev.catalyst.perl.org
Tue Apr 28 18:19:11 GMT 2009
Author: t0m
Date: 2009-04-28 19:19:08 +0100 (Tue, 28 Apr 2009)
New Revision: 9919
Modified:
Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
Log:
That is actually a stupid idea - you may be using Catalyst::Controller::Foo as an alternate base class, which would be excluded by this.
Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm 2009-04-28 17:55:30 UTC (rev 9918)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm 2009-04-28 18:19:08 UTC (rev 9919)
@@ -2168,7 +2168,6 @@
sub _controller_init_base_classes {
my ($app_class, $component) = @_;
foreach my $class ( reverse @{ mro::get_linear_isa($component) } ) {
- next unless $class =~ /^$app_class/;
Moose->init_meta( for_class => $class )
unless find_meta($class);
}
More information about the Catalyst-commits
mailing list