"use feature 'state'" as a prefix, so that we'll be able to skip it on older perls

[perl/modules/indirect.git] / t / 20-bad.t

diff --git a/t/20-bad.t b/t/20-bad.t
index 65511fd09a06f68cf1d1281179113a78c6b13e82..5abb4ad9c1d262429b66f9b33753609e6e432a71 100644 (file)
--- a/t/20-bad.t
+++ b/t/20-bad.t
@@ -11,11 +11,8 @@ use warnings;
 
 use Test::More tests => 50 * 6 + 2;
 
-use feature 'state';
-
 my ($obj, $x);
 our ($y, $bloop);
-state $z;
 
 sub expect {
  my ($pkg) = @_;
@@ -151,11 +148,11 @@ meh $y;
 meh $y 1, 2;
 ####
 meh $y, 1, 2;
-####
+#### # use feature 'state'; state $z
 meh $z;
-####
+#### # use feature 'state'; state $z
 meh $z 1, 2;
-####
+#### # use feature 'state'; state $z
 meh $z, 1, 2;
 ####
 package sploosh;