From: Daisuke Maki <dmaki@cpan.org>
Date: Tue, 3 Mar 2009 14:46:36 +0000 (+0000)
Subject: additional warning
X-Git-Tag: 0.72_01~91
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3723643925c84a5f480ef2b92eaa8b6f1407050c;p=gitmo%2FMoose.git

additional warning
---

diff --git a/lib/Moose/Meta/Method/Constructor.pm b/lib/Moose/Meta/Method/Constructor.pm
index 903e43c..e1a8bb9 100644
--- a/lib/Moose/Meta/Method/Constructor.pm
+++ b/lib/Moose/Meta/Method/Constructor.pm
@@ -81,7 +81,10 @@ sub can_be_inlined {
         if ( $constructor->body != $expected_class->can('new') ) {
             my $warning
                 = "Not inlining a constructor for $class since it is not"
-                . " inheriting the default $expected_class constructor\n";
+                . " inheriting the default $expected_class constructor\n"
+                . "If you are certain you don't need to inline your"
+                . " constructor, specify inline_constructor => 0 in your"
+                . " call to $class->meta->make_immutable\n";
 
             $warning .= " (constructor has method modifiers which would be lost if it were inlined)\n"
                 if $constructor->isa('Class::MOP::Method::Wrapped');