From: Hans Dieter Pearcey <hdp@weftsoar.net>
Date: Mon, 27 Apr 2009 15:22:03 +0000 (-0400)
Subject: avoid warnings
X-Git-Tag: 0.103~2
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=14e0ff58761a4e35d46fad890cff7faa15d791cf;p=gitmo%2FMooseX-InsideOut.git

avoid warnings
---

diff --git a/Changes b/Changes
index 2e3afb0..b9044f5 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,9 @@
 Revision history for MooseX-InsideOut
 
+0.103   Mon, 27 Apr 2009 11:22:28 -0400
+
+  * avoid warnings with latest Moose
+
 0.102   Sat, 04 Apr 2009 16:43:59 -0400
 
   * add prereq for namespace::clean
diff --git a/t/sub.t b/t/sub.t
index 85f6a6b..7826411 100644
--- a/t/sub.t
+++ b/t/sub.t
@@ -40,5 +40,7 @@ for my $c (@classes) {
 #  use Data::Dumper;
 #  diag Dumper($obj);
 
-  $sub->meta->make_immutable, redo if $sub->meta->is_mutable;
+  $sub->meta->make_immutable(
+    inline_constructor => ($c ne 'Hash' and $c ne 'Array')
+  ), redo if $sub->meta->is_mutable;
 }