# HG changeset patch # User Jordi GutiƩrrez Hermoso <jordigh@gmail.com> # Date 1250797804 18000 # Node ID 65035a108782e633cd57393e3b892a1ccdcbd011 # Parent 6999ba7bf22b9859e2961e748d5bfda606335d84 Fix the call to usleep diff --git a/teh-lol.pl b/teh-lol.pl --- a/teh-lol.pl +++ b/teh-lol.pl @@ -57,7 +57,10 @@ $delay += ((length $relol) - 3 + rand(5)) * 0.069; } - Time::HiRes::usleep($delay+2); + #Convert to microseconds. + $delay *= 1e6; + + Time::HiRes::usleep($delay); Xchat::command("say $relol"); }