X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faccessors_wo.t;h=9fc2bcd05a919d4ec5b26a9f5530cf10a7c2024b;hb=ed6069878c2506fed25cf5dd71c4fa6e276b80da;hp=5f996e5ff05e5f962a302760cbaef4249f8430fa;hpb=da609a465417b66a52918e7e2be3c38309bdc21f;p=p5sagit%2FClass-Accessor-Grouped.git diff --git a/t/accessors_wo.t b/t/accessors_wo.t index 5f996e5..9fc2bcd 100644 --- a/t/accessors_wo.t +++ b/t/accessors_wo.t @@ -1,7 +1,8 @@ -use Test::More tests => 46; +use Test::More; use Test::Exception; use strict; use warnings; +no warnings 'once'; use Config; use lib 't/lib'; @@ -52,7 +53,7 @@ my $test_accessors = { custom_field => "lr2'field", }, fieldname_torture => { - custom_field => join ('', map { chr($_) } (1..255) ), # FIXME after RT#80569 is fixed 0..255 should work + custom_field => join ('', map { chr($_) } (0..255) ), is_xs => $use_xs, }, }; @@ -101,5 +102,4 @@ for my $name (sort keys %$test_accessors) { } }; -# important -1; \ No newline at end of file +done_testing unless $::SUBTESTING;