X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLexical-Types.git;a=blobdiff_plain;f=t%2F23-magic-uvar.t;h=e1d764d980bb5d1ace9b0e9efb160f411f151464;hp=ce80f2ec95ccb0cf2e3ac8827079bb71a41dd05a;hb=edb71e7af0ed10c8b114f0aaab25ff1b20d4d99e;hpb=c5d3b9e2115202f79337d1fcfe44ae673c2d9251 diff --git a/t/23-magic-uvar.t b/t/23-magic-uvar.t index ce80f2e..e1d764d 100644 --- a/t/23-magic-uvar.t +++ b/t/23-magic-uvar.t @@ -5,9 +5,13 @@ use warnings; use Test::More; +use lib 't/lib'; +use VPIT::TestHelpers; + BEGIN { - plan skip_all => 'Variable::Magic 0.35 on 5.10 required to test uvar magic' - unless eval "use Variable::Magic 0.35; Variable::Magic::VMG_UVAR"; + load_or_skip('Variable::Magic', '0.35', [ ], 'required to test uvar magic'); + plan skip_all => 'perl 5.10 required to test uvar magic' + unless Variable::Magic::VMG_UVAR(); } { @@ -34,7 +38,6 @@ BEGIN { BEGIN { plan tests => 2 * 11; - defined and diag "Using Variable::Magic $_" for $Variable::Magic::VERSION; } use Lexical::Types as => 'Lexical::Types::Test';