X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fimpl-selection%2Fbasic-xs.t;h=0fe2aa35ce6ea3be42d7fa8c6a99f9b69231d4f6;hb=7ef54f40657ca05b95a31e7c81c28c2446b2cf37;hp=bffd3b7b30d665d501bbb0d768e34440653b8cdf;hpb=fcc593391ce79d11386af5064dd216682e6f843f;p=gitmo%2FPackage-Stash.git

diff --git a/t/impl-selection/basic-xs.t b/t/impl-selection/basic-xs.t
index bffd3b7..0fe2aa3 100644
--- a/t/impl-selection/basic-xs.t
+++ b/t/impl-selection/basic-xs.t
@@ -396,8 +396,8 @@ like(exception {
         [qw(BEGIN bar baz foo quuuux quuux quux)],
         "list_all_symbols",
     );
-    { local $TODO = ($] < 5.010 || $Package::Stash::IMPLEMENTATION eq 'PP')
-          ? "undef scalars aren't visible on 5.8, or from pure perl at all"
+    { local $TODO = $] < 5.010
+          ? "undef scalars aren't visible on 5.8"
           : undef;
     is_deeply(
         [sort $quuux->list_all_symbols('SCALAR')],