]> git.vpit.fr Git - perl/modules/Variable-Magic.git/blobdiff - t/15-self.t
Remove taint mode from t/15-self.t
[perl/modules/Variable-Magic.git] / t / 15-self.t
index a205ea51e1e1414da6d968244a0495ede4ec1f38..adc4ec7a59e9d056eb4da86b116ff9fc11892540 100644 (file)
@@ -1,4 +1,4 @@
-#!perl -T
+#!perl
 
 use strict;
 use warnings;
@@ -162,10 +162,7 @@ my $c = 0;
      }
 
      if ($die) {
-      SKIP: {
-       skip 'error not propagated' => 1 if $magic eq 'free';
-       like $err, qr/^oops at/, "$desc: correct error";
-      }
+      like $err, qr/^oops at/, "$desc: correct error";
       is $res, undef, "$desc: returned undef";
      } else {
       is $err, '', "$desc: no error";