summaryrefslogtreecommitdiff
path: root/t/15_protected_attribute.t
diff options
context:
space:
mode:
Diffstat (limited to 't/15_protected_attribute.t')
-rw-r--r--t/15_protected_attribute.t34
1 files changed, 15 insertions, 19 deletions
diff --git a/t/15_protected_attribute.t b/t/15_protected_attribute.t
index fe3fd9a..36e8f66 100644
--- a/t/15_protected_attribute.t
+++ b/t/15_protected_attribute.t
@@ -5,28 +5,24 @@ use Test::More tests => 10;
use Test::Exception;
use Test::Moose;
-{
-
- package Foo;
- use Moose;
- use MooseX::Privacy;
-
- has foo => (
- is => 'rw',
- isa => 'Str',
- traits => [qw/Protected/],
- default => 'foo'
- );
-}
+package Foo;
+use Moose;
+use MooseX::Privacy;
-{
+has foo => (
+ is => 'rw',
+ isa => 'Str',
+ traits => [qw/Protected/],
+ default => 'foo'
+);
- package Bar;
- use Moose;
- extends 'Foo';
+package Bar;
+use Moose;
+extends 'Foo';
- sub bar { (shift)->foo }
-}
+sub bar { (shift)->foo }
+
+package main;
with_immutable {
ok my $foo = Foo->new();