summaryrefslogtreecommitdiff
path: root/lib/MooseX
diff options
context:
space:
mode:
authorfranck cuny <franck@lumberjaph.net>2010-06-02 11:35:13 +0200
committerfranck cuny <franck@lumberjaph.net>2010-06-02 11:35:13 +0200
commit31baf7b70e2f7c63476685afe18fc7c4697274d4 (patch)
tree90ef8cedb304f4c384a936c0ffe7d58be3de94d4 /lib/MooseX
parentuse JSON, add POD (diff)
downloadmoosex-net-api-31baf7b70e2f7c63476685afe18fc7c4697274d4.tar.gz
meta class with role
Diffstat (limited to '')
-rw-r--r--lib/MooseX/Net/API/Meta/Class.pm23
1 files changed, 4 insertions, 19 deletions
diff --git a/lib/MooseX/Net/API/Meta/Class.pm b/lib/MooseX/Net/API/Meta/Class.pm
index e4bed0c..376578d 100644
--- a/lib/MooseX/Net/API/Meta/Class.pm
+++ b/lib/MooseX/Net/API/Meta/Class.pm
@@ -1,25 +1,10 @@
package MooseX::Net::API::Meta::Class;
use Moose::Role;
-use Moose::Meta::Class;
-use MooseX::Types::Moose qw(Str ArrayRef ClassName Object);
-has local_api_methods => (
- traits => ['Array'],
- is => 'ro',
- isa => ArrayRef [Str],
- required => 1,
- default => sub { [] },
- auto_deref => 1,
- handles => { '_add_api_method' => 'push' },
-);
-
-sub _build_meta_class {
- my $self = shift;
- return Moose::Meta::Class->create_anon_class(
- superclasses => [ $self->method_metaclass ],
- cache => 1,
- );
-}
+with qw/
+ MooseX::Net::API::Meta::Method::APIMethod
+ MooseX::Net::API::Meta::Method::APIDeclare
+ /;
1;