X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FMethod%2FConstructor.pm;h=596dccfdef3e9a3d82ec69148f286c9f646003d2;hp=ea374196297150edff12e9bfe76ccefefcbae58a;hb=b898bac83890927c156ceb14e4921b38dc1068be;hpb=01afd8ffba9b9783e84c6cfc8ba45e11a0f5d8f4 diff --git a/lib/Mouse/Meta/Method/Constructor.pm b/lib/Mouse/Meta/Method/Constructor.pm index ea37419..596dccf 100644 --- a/lib/Mouse/Meta/Method/Constructor.pm +++ b/lib/Mouse/Meta/Method/Constructor.pm @@ -182,6 +182,7 @@ sub _generate_BUILDALL { my @code; for my $class ($metaclass->linearized_isa) { no strict 'refs'; + no warnings 'once'; if (*{ $class . '::BUILD' }{CODE}) { unshift @code, qq{${class}::BUILD(\$instance, \$args);};