X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F16-huf.t;h=32f767770749e8bd8fe41f33397652d8ffff6c77;hb=3bc98bdbdb230943e7fb3135e325f10013acac2d;hp=0934219579ca9613d9955ceda412f0967ace69c0;hpb=159e8ad7c747edb4a25db2f2673bbe143531f347;p=perl%2Fmodules%2FVariable-Magic.git diff --git a/t/16-huf.t b/t/16-huf.t index 0934219..32f7677 100644 --- a/t/16-huf.t +++ b/t/16-huf.t @@ -5,7 +5,7 @@ use warnings; use Test::More; -use Variable::Magic qw/wizard cast dispell VMG_UVAR/; +use Variable::Magic qw; if (!VMG_UVAR) { plan skip_all => 'No nice uvar magic for this perl'; @@ -23,7 +23,7 @@ if ($@) { use lib 't/lib'; use Variable::Magic::TestWatcher; -my $wiz = init_watcher [ qw/fetch store/ ], 'huf'; +my $wiz = init_watcher [ qw ], 'huf'; ok defined($wiz), 'huf: wizard with uvar is defined'; is ref($wiz), 'SCALAR', 'huf: wizard with uvar is a scalar ref';