X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fno-bareword.t;h=702cbb54113a1b66377e1512243cf6dbb18a2e74;hb=393b1599659afded29c96ad70672cf0dedda4b88;hp=9032aaf3f70b846d6abef146534f66623642129d;hpb=f7acf3b0e85131b2ec7d439f857e63661f96931b;p=p5sagit%2FDevel-Declare.git

diff --git a/t/no-bareword.t b/t/no-bareword.t
index 9032aaf..702cbb5 100644
--- a/t/no-bareword.t
+++ b/t/no-bareword.t
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-use Test::More;
+use Test::More 0.88;
 
 our $i;
 BEGIN { $i = 0 };
@@ -27,12 +27,8 @@ my @foo = (
     =>
     123
 );
+BEGIN { is($i, 0) }
 
-TODO: {
-    BEGIN {
-        local $TODO = 'fat commas not quoting barewords';
-        is($i, 0);
-    }
-}
+is_deeply(\@foo, ['method', '123']);
 
 done_testing;