From: Peter Rabbitson Date: Fri, 16 Mar 2012 10:51:16 +0000 (+0100) Subject: Fix spurious 'once' warnings X-Git-Tag: v0.009014~8 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0fe2ad8c2ab220a0d6dda54aaa4684e8b711f9b3;p=gitmo%2FMoo.git Fix spurious 'once' warnings --- diff --git a/Changes b/Changes index 90a6e76..c8aa52f 100644 --- a/Changes +++ b/Changes @@ -5,6 +5,7 @@ things down to do it this way and makes debugging easier. - Revert 'local $@' around require calls to avoid triggering Unknown Error - Explicitly require Role::Tiny in Role::Tiny::With (RT#70446) + - Fix spurious 'once' warnings under perl -w 0.009013 - 2011-12-23 - fix up Class::XSAccessor version check to be more robust diff --git a/lib/Moo/_Utils.pm b/lib/Moo/_Utils.pm index 6fa6e24..5f62a98 100644 --- a/lib/Moo/_Utils.pm +++ b/lib/Moo/_Utils.pm @@ -1,5 +1,7 @@ package Moo::_Utils; +no warnings 'once'; # guard against -w + sub _getglob { \*{$_[0]} } sub _getstash { \%{"$_[0]::"} }