X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git;a=blobdiff_plain;f=t%2F69-uplevel-threads.t;h=775add33847963c257f367df82d5d04774ce84f5;hp=11255f7a2050993dea7c845488038c0e32138fff;hb=d3f4330e8978050c587078a1f6a6f1c19e7a6318;hpb=d5bd1454cae95ffddd93e685e3c81b893046fcdb

diff --git a/t/69-uplevel-threads.t b/t/69-uplevel-threads.t
index 11255f7..775add3 100644
--- a/t/69-uplevel-threads.t
+++ b/t/69-uplevel-threads.t
@@ -68,4 +68,4 @@ my @threads = map spawn(\&up1), 1 .. 30;
 
 $_->join for @threads;
 
-done_testing(3 + scalar(@threads) * 3);
+done_testing;