From: Dave Rolsky Date: Tue, 9 Feb 2010 23:22:03 +0000 (-0600) Subject: Use private _class_attribute_map method X-Git-Tag: 0.11~9 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=23095f0a51649e66b5d1bcd0ce10a0504051dbae;p=gitmo%2FMooseX-ClassAttribute.git Use private _class_attribute_map method --- diff --git a/lib/MooseX/ClassAttribute/Trait/Class.pm b/lib/MooseX/ClassAttribute/Trait/Class.pm index 3f7f35f..d6fb58c 100644 --- a/lib/MooseX/ClassAttribute/Trait/Class.pm +++ b/lib/MooseX/ClassAttribute/Trait/Class.pm @@ -129,8 +129,8 @@ sub get_all_class_attributes { my %attrs = map { my $meta = Class::MOP::class_of($_); - $meta && $meta->can('get_class_attribute_map') - ? %{ $meta->get_class_attribute_map() } + $meta && $meta->can('_class_attribute_map') + ? %{ $meta->_class_attribute_map() } : () } reverse $self->linearized_isa;