From a9181c15d35e8eedfcded9d94a571a3c60cc741a Mon Sep 17 00:00:00 2001 From: franck cuny Date: Mon, 26 Jul 2010 09:15:11 +0200 Subject: use new Moose::Util::MetaRole --- lib/Net/HTTP/API.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'lib/Net') diff --git a/lib/Net/HTTP/API.pm b/lib/Net/HTTP/API.pm index 92908bb..ad2503b 100644 --- a/lib/Net/HTTP/API.pm +++ b/lib/Net/HTTP/API.pm @@ -4,6 +4,7 @@ package Net::HTTP::API; use Moose; use Moose::Exporter; +use Moose::Util::MetaRole; our $VERSION = '0.11'; @@ -31,8 +32,10 @@ sub init_meta { Moose->init_meta(%options); my $meta = Moose::Util::MetaRole::apply_metaroles( - for_class => $for, - metaclass_roles => ['Net::HTTP::API::Meta::Class'], + for => $for, + class_metaroles => { + class => ['Net::HTTP::API::Meta::Class'], + }, ); Moose::Util::MetaRole::apply_base_class_roles( -- cgit v1.2.3