X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F13-magic.t;h=06f96984e322bc213051a00b4905d89c90620688;hb=f172488ab16bbd50f0b46168f88ca5dd695b37f4;hp=883088b8ceec702bb81bbefd6c2bcef5f33bc41b;hpb=d69521b1f9cf9817ad62ff3f765a8e907c2d1fce;p=perl%2Fmodules%2FVariable-Temp.git diff --git a/t/13-magic.t b/t/13-magic.t index 883088b..06f9698 100644 --- a/t/13-magic.t +++ b/t/13-magic.t @@ -3,15 +3,17 @@ use strict; use warnings; -use Variable::Temp 'temp'; +use Variable::Temp 'set_temp'; -use Test::More tests => 14; +use Test::More; use lib 't/lib'; use VPIT::TestHelpers; load_or_skip_all('Variable::Magic', '0.55', undef); +plan tests => 14; + my $replaced = 0; my $freed = 0; @@ -28,7 +30,7 @@ my $wiz = Variable::Magic::wizard( is $freed, 0; { - temp $y = 2; + set_temp $y => 2; is $y, 2; is $replaced, 1; is $freed, 0;