test immutable too

[gitmo/MooseX-InsideOut.git] / t / sub.t

diff --git a/t/sub.t b/t/sub.t
index 5b704ad..85f6a6b 100644 (file)
--- a/t/sub.t
+++ b/t/sub.t
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-use Test::More tests => 28;
+use Test::More tests => 56;
 
 use lib 't/lib';
 my @classes = qw(IO Array Hash Moose);
@@ -40,4 +40,5 @@ for my $c (@classes) {
 #  use Data::Dumper;
 #  diag Dumper($obj);
 
+  $sub->meta->make_immutable, redo if $sub->meta->is_mutable;
 }