diff options
| author | Jesse Luehrs <doy@tozt.net> | 2011-03-02 22:32:12 -0600 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2011-03-02 22:35:04 -0600 |
| commit | f4a6e54d951725428aef71f0d81ab9f1e438d53c (patch) | |
| tree | 864fa797068aabcb11864044ed869c7708ef1087 /t/11-multiple-instantiation.t | |
| parent | 565afc7a56c520e8bf20dd8415d72481e861ed31 (diff) | |
| download | bread-board-declare-f4a6e54d951725428aef71f0d81ab9f1e438d53c.tar.gz bread-board-declare-f4a6e54d951725428aef71f0d81ab9f1e438d53c.zip | |
more with_immutable
Diffstat (limited to 't/11-multiple-instantiation.t')
| -rw-r--r-- | t/11-multiple-instantiation.t | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/t/11-multiple-instantiation.t b/t/11-multiple-instantiation.t index 7c5d8a2..c8372c1 100644 --- a/t/11-multiple-instantiation.t +++ b/t/11-multiple-instantiation.t @@ -2,6 +2,7 @@ use strict; use warnings; use Test::More; +use Test::Moose; { package Bar; @@ -32,9 +33,11 @@ use Test::More; ); } +with_immutable { my $foo1 = Foo->new; is($foo1->bar->foo, 'FOO'); my $foo2 = Foo->new(foo => 'BAR'); is($foo2->bar->foo, 'BAR'); +} 'Foo'; done_testing; |