X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F01-import.t;h=da61bbc9d57789ee9e27544add8ea8b27572a6f6;hb=95f528be96f28fc6246faddb1e18d7fe2d0a043b;hp=862d662ec3aa4e16428bec70fce6967f3fae12cf;hpb=50d757921d9013018ad16813fa5264a5791c6ad3;p=perl%2Fmodules%2FScope-Upper.git diff --git a/t/01-import.t b/t/01-import.t index 862d662..da61bbc 100644 --- a/t/01-import.t +++ b/t/01-import.t @@ -3,11 +3,13 @@ use strict; use warnings; -use Test::More tests => 10; +use Test::More tests => 14; require Scope::Upper; -for (qw/reap localize localize_elem localize_delete TOP CURRENT UP DOWN SUB EVAL/) { +for (qw/reap localize localize_elem localize_delete unwind want_at + TOP HERE UP SUB EVAL SCOPE CALLER + SU_THREADSAFE/) { eval { Scope::Upper->import($_) }; is($@, '', 'import ' . $_); }