From 90d87eb423c9e8dc48b9633bd7e884505ba9869a Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Thu, 3 Jan 2013 23:25:26 -0600
Subject: skip this test on 5.8 (and give it a description)

---
 t/edge-cases.t | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/t/edge-cases.t b/t/edge-cases.t
index 7424f9e..ddaca14 100644
--- a/t/edge-cases.t
+++ b/t/edge-cases.t
@@ -89,9 +89,12 @@ SKIP: {
 }
 
 {
+    local $TODO = $] < 5.010
+        ? "undef scalars aren't visible on 5.8"
+        : undef;
     my $stash = Package::Stash->new('Baz');
     $stash->add_symbol('$baz', \undef);
-    ok($stash->has_symbol('$baz'));
+    ok($stash->has_symbol('$baz'), "immortal scalars are also visible");
 }
 
 done_testing;
-- 
cgit v1.2.3-54-g00ecf