--- deliantra/server/lib/cf.pm 2007/01/05 20:04:02 1.140 +++ deliantra/server/lib/cf.pm 2007/01/05 20:08:53 1.141 @@ -275,10 +275,7 @@ })->prio (Coro::PRIO_MAX); while ($busy) { - unless (Coro::cede) { - Coro::nready ? Event::one_event 0 : Event::one_event; - Coro::cede_notself unless Coro::cede; - } + Coro::cede or Event::one_event; } wantarray ? @res : $res[0]