Works fine on perl 5.6

[gitmo/Role-Tiny.git] / t / concrete-methods.t

diff --git a/t/concrete-methods.t b/t/concrete-methods.t
index 8425386..6e7a695 100644 (file)
--- a/t/concrete-methods.t
+++ b/t/concrete-methods.t
@@ -9,6 +9,7 @@ use Test::Fatal;
   sub before_role {}
 
   use Role::Tiny;
+  no warnings 'once';
 
   our $GLOBAL1 = 1;
   sub after_role {}
@@ -16,6 +17,7 @@ use Test::Fatal;
 
 {
   package MyClass1;
+  no warnings 'once';
 
   our $GLOBAL1 = 1;
   sub method {}