Got inlining for hashes working.
[gitmo/Moose.git] / lib / Moose / Meta / Method / Accessor / Native / Array / get.pm
index 7dc8fa8..dc77cda 100644 (file)
@@ -3,13 +3,16 @@ package Moose::Meta::Method::Accessor::Native::Array::get;
 use strict;
 use warnings;
 
+use Class::MOP::MiniTrait;
+
 our $VERSION = '1.13';
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
-use base qw(
-    Moose::Meta::Method::Accessor::Native::Array
-    Moose::Meta::Method::Accessor::Native::Reader
+use base 'Moose::Meta::Method::Accessor::Native::Reader';
+
+Class::MOP::MiniTrait::apply( __PACKAGE__,
+    'Moose::Meta::Method::Accessor::Native::Array'
 );
 
 sub _minimum_arguments { 1 }