From 13312031c567552b3f18b650a49b83bb2f125576 Mon Sep 17 00:00:00 2001 From: groditi Date: Wed, 26 Nov 2008 20:34:44 +0000 Subject: some formatting fixes and removal of stray attribute --- t/lib/RTest/TestDB/Baz.pm | 12 ++++++------ t/lib/RTest/TestDB/Foo.pm | 12 +++++------- 2 files changed, 11 insertions(+), 13 deletions(-) (limited to 't/lib') diff --git a/t/lib/RTest/TestDB/Baz.pm b/t/lib/RTest/TestDB/Baz.pm index ad4c61e..3b0306e 100644 --- a/t/lib/RTest/TestDB/Baz.pm +++ b/t/lib/RTest/TestDB/Baz.pm @@ -11,12 +11,12 @@ use Reaction::Types::Core qw/NonEmptySimpleStr/; has 'id' => (isa => Int, is => 'ro', required => 1); has 'name' => (isa => NonEmptySimpleStr, is => 'rw', required => 1); has 'foo_list' => ( - isa => ArrayRef, - is => 'rw', - required => 1, - writer => 'set_foo_list', - reader => 'get_foo_list', - ); + isa => ArrayRef, + is => 'rw', + required => 1, + writer => 'set_foo_list', + reader => 'get_foo_list', +); around get_foo_list => sub { [ $_[1]->foo_list->all ] }; diff --git a/t/lib/RTest/TestDB/Foo.pm b/t/lib/RTest/TestDB/Foo.pm index a7e669c..9b34bf3 100644 --- a/t/lib/RTest/TestDB/Foo.pm +++ b/t/lib/RTest/TestDB/Foo.pm @@ -11,13 +11,11 @@ use Reaction::Types::Core qw/NonEmptySimpleStr/; has 'id' => (isa => Int, is => 'ro', required => 1); has 'first_name' => (isa => NonEmptySimpleStr, is => 'rw', required => 1); has 'last_name' => (isa => NonEmptySimpleStr, is => 'rw', required => 1); -has 'bars' => (isa => ArrayRef ); -has 'bazes' => - ( - isa => ArrayRef, - required => 1, - reader => 'get_bazes', - writer => 'set_bazes' +has 'bazes' => ( + isa => ArrayRef, + required => 1, + reader => 'get_bazes', + writer => 'set_bazes' ); use namespace::clean -except => [ 'meta' ]; -- cgit v1.2.3-54-g00ecf