--- deliantra/server/ext/tcp.ext 2006/12/15 19:59:19 1.2 +++ deliantra/server/ext/tcp.ext 2006/12/22 06:02:29 1.4 @@ -18,7 +18,7 @@ exit (2); } -Event->io (fd => $LISTEN, poll => 'r', data => cf::WF_AUTOCANCEL, cb => sub { +Event->io (fd => $LISTEN, nice => 1, poll => 'r', data => cf::WF_AUTOCANCEL, cb => sub { my ($fh, $peername) = $LISTEN->accept or return; @@ -27,5 +27,5 @@ warn "new connection from $host\n"; - cf::add_client $fd, $host; + cf::client::create $fd, $host; });