From: Dave Rolsky Date: Sat, 8 Dec 2007 17:58:29 +0000 (+0000) Subject: Simplify code a smidge X-Git-Tag: 0.04~4 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9cabc97e87e9f853c0813b36b77b54b82402efc7;p=gitmo%2FMooseX-ClassAttribute.git Simplify code a smidge --- diff --git a/lib/MooseX/ClassAttribute.pm b/lib/MooseX/ClassAttribute.pm index b7c6398..fee7e0a 100644 --- a/lib/MooseX/ClassAttribute.pm +++ b/lib/MooseX/ClassAttribute.pm @@ -32,10 +32,10 @@ sub process_class_attribute ## no critic RequireArgUnpacking my @parents = $caller_meta->superclasses(); my $container_pkg = _make_container_class( $caller, @parents ); + my $container_meta = $container_pkg->meta(); - $container_pkg->meta()->_process_attribute(@_); + $container_meta->_process_attribute(@_); - my $container_meta = $container_pkg->meta(); for my $meth ( grep { $_ ne 'instance' } $container_meta->get_method_list() ) { next if $caller_meta->has_method($meth);