]> git.vpit.fr Git - perl/modules/indirect.git/blobdiff - t/30-scope.t
Work around the "pragma propagating into require" bug
[perl/modules/indirect.git] / t / 30-scope.t
index 8eb7eccb975042c5a45a9e45f339ddaca0bc2015..b0f29b594855b03fc2a73be2637ff52183dd91c3 100644 (file)
@@ -70,7 +70,6 @@ sub expect {
 }
 
 {
- local $TODO = 'Need a workaround for this' if $] < 5.010001;
  my @w;
  {
   local $SIG{__WARN__} = sub { push @w, join '', @_ };