X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F23-clear.t;h=3af5545755e7e3e1585a10c04c4a280be1b7197e;hb=HEAD;hp=a3aad82ded0d9e07f14c90ac9ab46600e07163ab;hpb=b9df7824d4619174e28f9b1b5856c4a228d9cc7b;p=perl%2Fmodules%2FVariable-Magic.git diff --git a/t/23-clear.t b/t/23-clear.t index a3aad82..3af5545 100644 --- a/t/23-clear.t +++ b/t/23-clear.t @@ -5,7 +5,7 @@ use warnings; use Test::More tests => (2 * 5 + 2) + (2 * 2 + 1) + 1; -use Variable::Magic qw/cast dispell/; +use Variable::Magic qw; use lib 't/lib'; use Variable::Magic::TestWatcher; @@ -13,7 +13,7 @@ use Variable::Magic::TestValue; my $wiz = init_watcher 'clear', 'clear'; -my @a = qw/a b c/; +my @a = qw; watch { cast @a, $wiz } { }, 'cast array';