]> git.vpit.fr Git - perl/modules/autovivification.git/blobdiff - t/42-deparse.t
Port module loading in tests to VPIT::TestHelpers
[perl/modules/autovivification.git] / t / 42-deparse.t
index 85ad4fc69fe37155bedde38cb78ed02243d80354..436b03d2bc4d9472ea1f1b5a8ca61361c6bab4b4 100644 (file)
@@ -5,16 +5,18 @@ 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('B::Deparse', undef, [ ],
+             'required to test round-trip deparsing compatibility');
+
+plan tests => 2;
 
 my $bd = B::Deparse->new;
 
 {
- no autovivification qw/fetch strict/;
+ no autovivification qw<fetch strict>;
 
  sub blech { my $key = $_[0]->{key} }
 }