[Catalyst-commits] r13198 - Catalyst-Runtime/5.80/trunk/lib
rafl at dev.catalyst.perl.org
rafl at dev.catalyst.perl.org
Mon May 3 00:51:43 GMT 2010
Author: rafl
Date: 2010-05-03 01:51:43 +0100 (Mon, 03 May 2010)
New Revision: 13198
Modified:
Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
Log:
Remove useless conditional.
Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm 2010-05-02 23:46:42 UTC (rev 13197)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst.pm 2010-05-03 00:51:43 UTC (rev 13198)
@@ -2811,8 +2811,8 @@
} @{ $plugins };
for my $plugin ( reverse @plugins ) {
+ # pass along $plugin->[1] as well once cmop supports it
Class::MOP::load_class($plugin->[0]);
- # pass along $plugin->[1] as well once cmop supports it
my $meta = find_meta($plugin->[0]);
next if $meta && $meta->isa('Moose::Meta::Role');
@@ -2820,9 +2820,9 @@
}
my @roles =
- map { $_->[0]->name, $_->[1] }
- grep { $_->[0] && blessed($_->[0]) && $_->[0]->isa('Moose::Meta::Role') }
- map { [find_meta($_->[0]), $_->[1]] }
+ map { $_->[0]->name, $_->[1] }
+ grep { blessed($_->[0]) && $_->[0]->isa('Moose::Meta::Role') }
+ map { [find_meta($_->[0]), $_->[1]] }
@plugins;
Moose::Util::apply_all_roles(
More information about the Catalyst-commits
mailing list