X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F001_mouse%2F060-threads.t;fp=t%2F001_mouse%2F060-threads.t;h=1fb4c6225e79e32535f6c30ee50a32636fbf7bbd;hp=65331f0dd253868a6396472142ca7aa93a52e2b8;hb=145d67894adb93b4aa067e88b914fc83a5a3533c;hpb=6ec37ed3f4c83c360a4b4412e789bd2800a50777 diff --git a/t/001_mouse/060-threads.t b/t/001_mouse/060-threads.t index 65331f0..1fb4c62 100644 --- a/t/001_mouse/060-threads.t +++ b/t/001_mouse/060-threads.t @@ -2,10 +2,14 @@ use strict; use warnings; use constant HAS_THREADS => eval{ require threads && require threads::shared }; - -use if !HAS_THREADS, 'Test::More', (skip_all => "This is a test for threads ($@)"); use Test::More; +use if !HAS_THREADS, 'Test::More', + (skip_all => "This is a test for threads ($@)"); +use if $Test::More::VERSION == 2.00_01, 'Test::More', + (skip_all => "Test::Builder2 2.00_01 has bugs about threads"); + + { package MyTraits; use Mouse::Role; @@ -55,4 +59,6 @@ is $o->foo->value, 43; ok !$o->meta->is_immutable; +pass "done"; + done_testing;