From: Dave Rolsky Date: Fri, 26 Jun 2009 22:03:57 +0000 (-0500) Subject: more small style tweaks for AH tests X-Git-Tag: 0.89_02~101 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0f93f5d27c919d7433566c8bbb3d67deb39bac71;p=gitmo%2FMoose.git more small style tweaks for AH tests --- diff --git a/t/070_attribute_helpers/201_trait_counter.t b/t/070_attribute_helpers/201_trait_counter.t index 31f8671..cdb0642 100644 --- a/t/070_attribute_helpers/201_trait_counter.t +++ b/t/070_attribute_helpers/201_trait_counter.t @@ -12,7 +12,7 @@ use Test::Moose 'does_ok'; use Moose::AttributeHelpers; has 'counter' => ( - traits => [qw/Counter/], + traits => ['Counter'], is => 'ro', isa => 'Int', default => 0, diff --git a/t/070_attribute_helpers/202_trait_array.t b/t/070_attribute_helpers/202_trait_array.t index ebbff5f..cab89d0 100644 --- a/t/070_attribute_helpers/202_trait_array.t +++ b/t/070_attribute_helpers/202_trait_array.t @@ -16,7 +16,7 @@ my $sort; use Moose::AttributeHelpers; has 'options' => ( - traits => [qw/Collection::Array/], + traits => ['Collection::Array'], is => 'ro', isa => 'ArrayRef[Str]', default => sub { [] }, diff --git a/t/070_attribute_helpers/203_trait_hash.t b/t/070_attribute_helpers/203_trait_hash.t index 15bcda5..b809571 100644 --- a/t/070_attribute_helpers/203_trait_hash.t +++ b/t/070_attribute_helpers/203_trait_hash.t @@ -13,7 +13,7 @@ use Test::Moose 'does_ok'; use Moose::AttributeHelpers; has 'options' => ( - traits => [qw/Collection::Hash/], + traits => ['Collection::Hash'], is => 'ro', isa => 'HashRef[Str]', default => sub { {} }, diff --git a/t/070_attribute_helpers/204_trait_number.t b/t/070_attribute_helpers/204_trait_number.t index ad477ee..9b2c700 100644 --- a/t/070_attribute_helpers/204_trait_number.t +++ b/t/070_attribute_helpers/204_trait_number.t @@ -12,7 +12,7 @@ use Test::Moose; use Moose::AttributeHelpers; has 'integer' => ( - traits => [qw/Number/], + traits => ['Number'], is => 'ro', isa => 'Int', default => 5, diff --git a/t/070_attribute_helpers/205_trait_list.t b/t/070_attribute_helpers/205_trait_list.t index 9b27ad2..1c342e6 100644 --- a/t/070_attribute_helpers/205_trait_list.t +++ b/t/070_attribute_helpers/205_trait_list.t @@ -16,7 +16,7 @@ my $up; use Moose::AttributeHelpers; has '_options' => ( - traits => [qw/Collection::List/], + traits => ['Collection::List'], is => 'ro', isa => 'ArrayRef[Int]', init_arg => 'options', diff --git a/t/070_attribute_helpers/207_trait_string.t b/t/070_attribute_helpers/207_trait_string.t index 48183dc..a6af0ad 100644 --- a/t/070_attribute_helpers/207_trait_string.t +++ b/t/070_attribute_helpers/207_trait_string.t @@ -13,7 +13,7 @@ my $uc; use Moose::AttributeHelpers; has 'string' => ( - traits => [qw/String/], + traits => ['String'], is => 'rw', isa => 'Str', default => sub {''},