X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F42-deparse.t;h=be7e3024e7b5d0fdadd7e0207d5c069f65679c9a;hb=HEAD;hp=85ad4fc69fe37155bedde38cb78ed02243d80354;hpb=212cf2f8511a55f57224f4e043d2328a1f840693;p=perl%2Fmodules%2Fautovivification.git

diff --git a/t/42-deparse.t b/t/42-deparse.t
index 85ad4fc..be7e302 100644
--- a/t/42-deparse.t
+++ b/t/42-deparse.t
@@ -5,16 +5,17 @@ use warnings;
 
 use Test::More;
 
-if (eval 'use B::Deparse; 1') {
- plan tests => 2;
-} else {
- plan skip_all => 'B::Deparse is not available';
-}
+use lib 't/lib';
+use VPIT::TestHelpers;
+
+load_or_skip_all('B::Deparse', undef, [ ]);
+
+plan tests => 2;
 
 my $bd = B::Deparse->new;
 
 {
- no autovivification qw/fetch strict/;
+ no autovivification qw<fetch strict>;
 
  sub blech { my $key = $_[0]->{key} }
 }