Support for perl 5.8

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

diff --git a/t/20-bad.t b/t/20-bad.t
index 5abb4ad9c1d262429b66f9b33753609e6e432a71..c480d6c0a4720dca3a614caab688f33a6ba5da55 100644 (file)
--- a/t/20-bad.t
+++ b/t/20-bad.t
@@ -148,11 +148,11 @@ meh $y;
 meh $y 1, 2;
 ####
 meh $y, 1, 2;
-#### # use feature 'state'; state $z
+#### $] < 5.010 # use feature 'state'; state $z
 meh $z;
-#### # use feature 'state'; state $z
+#### $] < 5.010 # use feature 'state'; state $z
 meh $z 1, 2;
-#### # use feature 'state'; state $z
+#### $] < 5.010 # use feature 'state'; state $z
 meh $z, 1, 2;
 ####
 package sploosh;