From: Jesse Luehrs Date: Tue, 1 Dec 2009 21:53:46 +0000 (-0600) Subject: use new Moose::Exporter features X-Git-Tag: 0.05~12 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e92df8d4c4368509de031f6dffc773b041b4390c;p=gitmo%2FMooseX-UndefTolerant.git use new Moose::Exporter features --- diff --git a/lib/MooseX/UndefTolerant.pm b/lib/MooseX/UndefTolerant.pm index 419a7b4..e8662fd 100644 --- a/lib/MooseX/UndefTolerant.pm +++ b/lib/MooseX/UndefTolerant.pm @@ -1,27 +1,15 @@ package MooseX::UndefTolerant; -use strict; -use warnings; use Moose qw(); use Moose::Exporter; -use Moose::Util::MetaRole; use MooseX::UndefTolerant::Attribute; our $VERSION = '0.01'; -Moose::Exporter->setup_import_methods(); - -sub init_meta { - my (undef, %options) = @_; - - Moose->init_meta(%options); - - return Moose::Util::MetaRole::apply_metaclass_roles( - for_class => $options{for_class}, - attribute_metaclass_roles => [ 'MooseX::UndefTolerant::Attribute' ] - ); -} +Moose::Exporter->setup_import_methods( + attribute_metaclass_roles => [ 'MooseX::UndefTolerant::Attribute' ] +); 1;