From f9de2becaaca0b01dfb98334be00f27b8cbf05f4 Mon Sep 17 00:00:00 2001 From: franck cuny Date: Sat, 19 Jun 2010 15:08:51 +0200 Subject: some tidy --- t/15_protected_attribute.t | 34 +++++++++++++++------------------- 1 file changed, 15 insertions(+), 19 deletions(-) (limited to 't/15_protected_attribute.t') 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(); -- cgit v1.2.3