From: Florian Ragwitz Date: Sat, 2 Jan 2010 15:32:45 +0000 (+0100) Subject: Port from MXAH to native traits. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=refs%2Fheads%2Fnative_traits;p=p5sagit%2FDevel-REPL.git Port from MXAH to native traits. --- diff --git a/Makefile.PL b/Makefile.PL index 481d378..6f534c6 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -13,10 +13,9 @@ requires 'File::Spec'; requires 'Term::ReadLine'; # rest -requires 'Moose' => '0.74'; +requires 'Moose' => '0.90'; requires 'MooseX::Object::Pluggable' => '0.0009'; requires 'MooseX::Getopt' => '0.18'; -requires 'MooseX::AttributeHelpers' => '0.16'; requires 'namespace::clean'; requires 'File::HomeDir'; requires 'Task::Weaken'; diff --git a/lib/Devel/REPL.pm b/lib/Devel/REPL.pm index a38d2fe..f05bc63 100644 --- a/lib/Devel/REPL.pm +++ b/lib/Devel/REPL.pm @@ -322,7 +322,7 @@ the following: =item * -L >= 0.64 +L >= 0.90 =item * @@ -334,10 +334,6 @@ L >= 0.15 =item * -L >= 0.14 - -=item * - L =item * diff --git a/lib/Devel/REPL/Plugin/Nopaste.pm b/lib/Devel/REPL/Plugin/Nopaste.pm index accba68..dab0b41 100644 --- a/lib/Devel/REPL/Plugin/Nopaste.pm +++ b/lib/Devel/REPL/Plugin/Nopaste.pm @@ -1,7 +1,6 @@ package Devel::REPL::Plugin::Nopaste; use Devel::REPL::Plugin; -use MooseX::AttributeHelpers; use Moose::Util::TypeConstraints; use namespace::clean -except => [ 'meta' ]; use Scalar::Util qw(blessed); @@ -12,7 +11,7 @@ sub BEFORE_PLUGIN { } has complete_session => ( - metaclass => 'String', + traits => ['String'], is => 'rw', isa => 'Str', lazy => 1, diff --git a/lib/Devel/REPL/Plugin/Turtles.pm b/lib/Devel/REPL/Plugin/Turtles.pm index b53a3c1..89cd53b 100644 --- a/lib/Devel/REPL/Plugin/Turtles.pm +++ b/lib/Devel/REPL/Plugin/Turtles.pm @@ -3,8 +3,6 @@ use Devel::REPL::Plugin; use Scalar::Util qw(reftype); -use MooseX::AttributeHelpers; - use namespace::clean -except => [ 'meta' ]; has default_command_prefix => ( @@ -14,7 +12,7 @@ has default_command_prefix => ( ); has turtles_matchers => ( - metaclass => "Collection::Array", + traits => ["Collection::Array"], isa => "ArrayRef[RegexpRef|CodeRef]", is => "rw", lazy => 1,