X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F40-threads.t;fp=t%2F40-threads.t;h=013794bd348a1a57926ae30972050e2c5c112bc3;hb=3bc98bdbdb230943e7fb3135e325f10013acac2d;hp=b86a4b46ec89fd4201d45163ad857995a92088c1;hpb=159e8ad7c747edb4a25db2f2673bbe143531f347;p=perl%2Fmodules%2FVariable-Magic.git diff --git a/t/40-threads.t b/t/40-threads.t index b86a4b4..013794b 100644 --- a/t/40-threads.t +++ b/t/40-threads.t @@ -9,7 +9,7 @@ sub skipall { Test::More::plan(skip_all => $msg); } -use Config qw/%Config/; +use Config qw<%Config>; BEGIN { my $force = $ENV{PERL_VARIABLE_MAGIC_TEST_THREADS} ? 1 : !1; @@ -27,7 +27,10 @@ BEGIN { use Test::More; # after threads -use Variable::Magic qw/wizard cast dispell getdata VMG_THREADSAFE VMG_OP_INFO_NAME VMG_OP_INFO_OBJECT/; +use Variable::Magic qw< + wizard cast dispell getdata + VMG_THREADSAFE VMG_OP_INFO_NAME VMG_OP_INFO_OBJECT +>; BEGIN { skipall 'This Variable::Magic isn\'t thread safe' unless VMG_THREADSAFE;