X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FVPIT-TestHelpers.git;a=blobdiff_plain;f=lib%2FVPIT%2FTestHelpers.pm;h=763c7115a5f22e780dc04b1513d28b3d17526d6b;hp=f00b94df47198bf8656af87751e160fe9af369b5;hb=09bc4632d4b12d88192269d8e57251b41e157380;hpb=bf66cc32470cb5983fd445961530652826b9ed02 diff --git a/lib/VPIT/TestHelpers.pm b/lib/VPIT/TestHelpers.pm index f00b94d..763c711 100644 --- a/lib/VPIT/TestHelpers.pm +++ b/lib/VPIT/TestHelpers.pm @@ -622,7 +622,7 @@ sub init_usleep { } else { diag 'Using fallback usleep()'; $usleep = sub { - my $s = int($_[0] / 2.5e5); + my $s = int($_[0] / 1e6); sleep $s if $s; }; }