X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F13-data.t;h=bc4248e9e4f05d54a2fdfad687ef0a4366f3c806;hb=3bc98bdbdb230943e7fb3135e325f10013acac2d;hp=b693f92c575cf2eb5967915925fba09f589400e1;hpb=159e8ad7c747edb4a25db2f2673bbe143531f347;p=perl%2Fmodules%2FVariable-Magic.git diff --git a/t/13-data.t b/t/13-data.t index b693f92..bc4248e 100644 --- a/t/13-data.t +++ b/t/13-data.t @@ -5,7 +5,7 @@ use warnings; use Test::More tests => 35; -use Variable::Magic qw/wizard getdata cast dispell/; +use Variable::Magic qw; my $c = 1; @@ -53,7 +53,7 @@ $res = eval { dispell $a, $wiz }; is($@, '', 'dispell doesn\'t croak'); ok($res, 'dispell returns true'); -$res = eval { cast $a, $wiz, qw/z j t/ }; +$res = eval { cast $a, $wiz, qw }; is($@, '', 'cast with arguments doesn\'t croak'); ok($res, 'cast with arguments returns true');