From: Hans Dieter Pearcey Date: Thu, 25 Jun 2009 20:39:47 +0000 (-0400) Subject: rename MooseX -> Moose X-Git-Tag: 0.89_02~131 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a41de825b0217d1986d785bf23aa59386ad7f263;p=gitmo%2FMoose.git rename MooseX -> Moose --- diff --git a/t/070_attribute_helpers/201_trait_counter.t b/t/070_attribute_helpers/201_trait_counter.t index 67fedde..0fa544f 100644 --- a/t/070_attribute_helpers/201_trait_counter.t +++ b/t/070_attribute_helpers/201_trait_counter.t @@ -7,7 +7,7 @@ use Test::More tests => 18; use Test::Moose 'does_ok'; BEGIN { - use_ok('MooseX::AttributeHelpers'); + use_ok('Moose::AttributeHelpers'); } { @@ -15,7 +15,7 @@ BEGIN { use Moose; has 'counter' => ( - traits => [qw/MooseX::AttributeHelpers::Trait::Counter/], + traits => [qw/Counter/], is => 'ro', isa => 'Int', default => sub { 0 }, @@ -64,7 +64,7 @@ is($page->counter, 2, '... decrement by arg'); # check the meta .. my $counter = $page->meta->get_attribute('counter'); -does_ok($counter, 'MooseX::AttributeHelpers::Trait::Counter'); +does_ok($counter, 'Moose::AttributeHelpers::Trait::Counter'); is($counter->helper_type, 'Num', '... got the expected helper type'); diff --git a/t/070_attribute_helpers/202_trait_array.t b/t/070_attribute_helpers/202_trait_array.t index 961a684..a84fd5c 100644 --- a/t/070_attribute_helpers/202_trait_array.t +++ b/t/070_attribute_helpers/202_trait_array.t @@ -8,7 +8,7 @@ use Test::Exception; use Test::Moose 'does_ok'; BEGIN { - use_ok('MooseX::AttributeHelpers'); + use_ok('Moose::AttributeHelpers'); } { @@ -16,7 +16,7 @@ BEGIN { use Moose; has 'options' => ( - traits => [qw/MooseX::AttributeHelpers::Trait::Collection::Array/], + traits => [qw/Collection::Array/], is => 'ro', isa => 'ArrayRef[Str]', default => sub { [] }, @@ -222,7 +222,7 @@ dies_ok { ## test the meta my $options = $stuff->meta->get_attribute('options'); -does_ok($options, 'MooseX::AttributeHelpers::Trait::Collection::Array'); +does_ok($options, 'Moose::AttributeHelpers::Trait::Collection::Array'); is_deeply($options->handles, 'add_options' => 'push', diff --git a/t/070_attribute_helpers/203_trait_hash.t b/t/070_attribute_helpers/203_trait_hash.t index 9d5d862..edcc931 100644 --- a/t/070_attribute_helpers/203_trait_hash.t +++ b/t/070_attribute_helpers/203_trait_hash.t @@ -8,16 +8,16 @@ use Test::Exception; use Test::Moose 'does_ok'; BEGIN { - use_ok('MooseX::AttributeHelpers'); + use_ok('Moose::AttributeHelpers'); } { package Stuff; use Moose; - use MooseX::AttributeHelpers; + use Moose::AttributeHelpers; has 'options' => ( - traits => [qw/MooseX::AttributeHelpers::Trait::Collection::Hash/], + traits => [qw/Collection::Hash/], is => 'ro', isa => 'HashRef[Str]', default => sub { {} }, @@ -133,7 +133,7 @@ dies_ok { ## test the meta my $options = $stuff->meta->get_attribute('options'); -does_ok($options, 'MooseX::AttributeHelpers::Trait::Collection::Hash'); +does_ok($options, 'Moose::AttributeHelpers::Trait::Collection::Hash'); is_deeply($options->handles, { 'add_options' => 'push', diff --git a/t/070_attribute_helpers/204_trait_number.t b/t/070_attribute_helpers/204_trait_number.t index bbc6654..f261201 100644 --- a/t/070_attribute_helpers/204_trait_number.t +++ b/t/070_attribute_helpers/204_trait_number.t @@ -7,7 +7,7 @@ use Test::More tests => 26; use Test::Moose; BEGIN { - use_ok('MooseX::AttributeHelpers'); + use_ok('Moose::AttributeHelpers'); } { @@ -15,7 +15,7 @@ BEGIN { use Moose; has 'integer' => ( - traits => [qw/MooseX::AttributeHelpers::Trait::Number/], + traits => [qw/Number/], is => 'ro', isa => 'Int', default => sub { 5 }, @@ -94,7 +94,7 @@ is $real->integer, 12, 'dec 13'; ## test the meta my $attr = $real->meta->get_attribute('integer'); -does_ok($attr, 'MooseX::AttributeHelpers::Trait::Number'); +does_ok($attr, 'Moose::AttributeHelpers::Trait::Number'); is_deeply($attr->handles, { set => 'set', diff --git a/t/070_attribute_helpers/205_trait_list.t b/t/070_attribute_helpers/205_trait_list.t index afc6252..844b87c 100644 --- a/t/070_attribute_helpers/205_trait_list.t +++ b/t/070_attribute_helpers/205_trait_list.t @@ -8,7 +8,7 @@ use Test::Exception; use Test::Moose 'does_ok'; BEGIN { - use_ok('MooseX::AttributeHelpers'); + use_ok('Moose::AttributeHelpers'); } { @@ -16,7 +16,7 @@ BEGIN { use Moose; has '_options' => ( - traits => [qw/MooseX::AttributeHelpers::Trait::Collection::List/], + traits => [qw/Collection::List/], is => 'ro', isa => 'ArrayRef[Int]', init_arg => 'options', @@ -124,7 +124,7 @@ is_deeply([$stuff->descending], [reverse 1 .. 10]); ## test the meta my $options = $stuff->meta->get_attribute('_options'); -does_ok($options, 'MooseX::AttributeHelpers::Trait::Collection::List'); +does_ok($options, 'Moose::AttributeHelpers::Trait::Collection::List'); is_deeply($options->handles, { 'num_options' => 'count', diff --git a/t/070_attribute_helpers/206_trait_bag.t b/t/070_attribute_helpers/206_trait_bag.t index e6c69b5..fba4959 100644 --- a/t/070_attribute_helpers/206_trait_bag.t +++ b/t/070_attribute_helpers/206_trait_bag.t @@ -8,16 +8,16 @@ use Test::Exception; use Test::Moose 'does_ok'; BEGIN { - use_ok('MooseX::AttributeHelpers'); + use_ok('Moose::AttributeHelpers'); } { package Stuff; use Moose; - use MooseX::AttributeHelpers; + use Moose::AttributeHelpers; has 'word_histogram' => ( - traits => [qw/MooseX::AttributeHelpers::Trait::Collection::Bag/], + traits => [qw/Collection::Bag/], is => 'ro', handles => { 'add_word' => 'add', @@ -65,7 +65,7 @@ is($stuff->get_count_for('baz'), 11, '... got words now'); ## test the meta my $words = $stuff->meta->get_attribute('word_histogram'); -does_ok($words, 'MooseX::AttributeHelpers::Trait::Collection::Bag'); +does_ok($words, 'Moose::AttributeHelpers::Trait::Collection::Bag'); is_deeply($words->handles, { 'add_word' => 'add', diff --git a/t/070_attribute_helpers/207_trait_string.t b/t/070_attribute_helpers/207_trait_string.t index 39966f0..baab0d8 100644 --- a/t/070_attribute_helpers/207_trait_string.t +++ b/t/070_attribute_helpers/207_trait_string.t @@ -7,7 +7,7 @@ use Test::More tests => 27; use Test::Moose 'does_ok'; BEGIN { - use_ok('MooseX::AttributeHelpers'); + use_ok('Moose::AttributeHelpers'); } { @@ -15,7 +15,7 @@ BEGIN { use Moose; has 'string' => ( - traits => [qw/MooseX::AttributeHelpers::Trait::String/], + traits => [qw/String/], is => 'rw', isa => 'Str', default => sub { '' }, @@ -96,7 +96,7 @@ is($page->string, '', "clear"); # check the meta .. my $string = $page->meta->get_attribute('string'); -does_ok($string, 'MooseX::AttributeHelpers::Trait::String'); +does_ok($string, 'Moose::AttributeHelpers::Trait::String'); is($string->helper_type, 'Str', '... got the expected helper type'); diff --git a/t/070_attribute_helpers/208_trait_bool.t b/t/070_attribute_helpers/208_trait_bool.t index 4e66f4e..5462d90 100644 --- a/t/070_attribute_helpers/208_trait_bool.t +++ b/t/070_attribute_helpers/208_trait_bool.t @@ -4,13 +4,13 @@ use strict; use warnings; use Test::More tests => 8; -use MooseX::AttributeHelpers; +use Moose::AttributeHelpers; { package Room; use Moose; has 'is_lit' => ( - traits => ['MooseX::AttributeHelpers::Trait::Bool'], + traits => ['Bool'], is => 'rw', isa => 'Bool', default => sub { 0 },