aboutsummaryrefslogtreecommitdiffstats
path: root/t
diff options
context:
space:
mode:
Diffstat (limited to 't')
-rw-r--r--t/lib/RTest/TestDB/Baz.pm12
-rw-r--r--t/lib/RTest/TestDB/Foo.pm13
2 files changed, 12 insertions, 13 deletions
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 d9bd736..952fb7b 100644
--- a/t/lib/RTest/TestDB/Foo.pm
+++ b/t/lib/RTest/TestDB/Foo.pm
@@ -11,13 +11,12 @@ 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, is => 'ro' );
-has 'bazes' =>
- (
- isa => ArrayRef,
- required => 1,
- reader => 'get_bazes',
- writer => 'set_bazes'
+has 'bars' => (isa => ArrayRef, is => 'ro');
+has 'bazes' => (
+ isa => ArrayRef,
+ required => 1,
+ reader => 'get_bazes',
+ writer => 'set_bazes'
);
use namespace::clean -except => [ 'meta' ];