]> git.vpit.fr Git - perl/modules/Lexical-Types.git/blobdiff - t/22-magic.t
Remove the #ifdef wrapping the mutex locks/unlocks
[perl/modules/Lexical-Types.git] / t / 22-magic.t
index f1ec1f969e2f14285ca44d024cce1b9282169f22..350cbe17d4fb5dbb8607c81c051b74633ebc617c 100644 (file)
@@ -29,6 +29,7 @@ BEGIN {
 
 BEGIN {
  plan tests => 2 * 8;
+ defined and diag "Using Variable::Magic $_" for $Variable::Magic::VERSION;
 }
 
 use Lexical::Types as => 'Lexical::Types::Test';
@@ -47,6 +48,7 @@ sub check (&$$;$) {
   } else {
    eval { $test->() };
   }
+  local $Test::Builder::Level = $Test::Builder::Level + 1;
   is_deeply $got, $exp, $desc;
  }
  return $want ? @ret : $ret[0];