summaryrefslogtreecommitdiffstats
path: root/t/04-block.t
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2011-02-21 01:53:08 -0600
committerJesse Luehrs <doy@tozt.net>2011-02-21 01:53:08 -0600
commit06f919c57dfc917e50e6858100cfbe3a1b57a1be (patch)
tree8d269551288407c1cc78c9d7ad7466cf7e9a8bcb /t/04-block.t
parentd1149a69c6121025816d388fadc3861e7407c594 (diff)
downloadbread-board-declare-06f919c57dfc917e50e6858100cfbe3a1b57a1be.tar.gz
bread-board-declare-06f919c57dfc917e50e6858100cfbe3a1b57a1be.zip
make sure i'm testing immutability too
Diffstat (limited to 't/04-block.t')
-rw-r--r--t/04-block.t5
1 files changed, 3 insertions, 2 deletions
diff --git a/t/04-block.t b/t/04-block.t
index c0f9bad..3d31d6d 100644
--- a/t/04-block.t
+++ b/t/04-block.t
@@ -2,6 +2,7 @@
use strict;
use warnings;
use Test::More;
+use Test::Moose;
{
package Foo;
@@ -31,9 +32,9 @@ use Test::More;
);
}
-{
+with_immutable {
my $foo = Foo->new;
is($foo->baz, 'BARFOO', "self is passed properly");
-}
+} 'Foo';
done_testing;