X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faccessors.t;h=e2ea1f70bbc67cfdfbb9f280f3777981cf28e7c8;hb=ed6069878c2506fed25cf5dd71c4fa6e276b80da;hp=9a27723c5770368e08df0c008c29daccc92a4c1b;hpb=5808b2245979b6d4c0582c10892e8526aa00d673;p=p5sagit%2FClass-Accessor-Grouped.git

diff --git a/t/accessors.t b/t/accessors.t
index 9a27723..e2ea1f7 100644
--- a/t/accessors.t
+++ b/t/accessors.t
@@ -1,6 +1,7 @@
 use Test::More;
 use strict;
 use warnings;
+no warnings 'once';
 use lib 't/lib';
 use B qw/svref_2object/;
 
@@ -134,4 +135,4 @@ for my $class (qw(
   }
 }
 
-done_testing;
+done_testing unless $::SUBTESTING;