--- deliantra/server/lib/cf.pm 2007/12/16 02:50:33 1.399 +++ deliantra/server/lib/cf.pm 2007/12/17 06:36:34 1.400 @@ -12,7 +12,7 @@ use Safe::Hole; use Storable (); -use Coro 4.1 (); +use Coro 4.32 (); use Coro::State; use Coro::Handle; use Coro::EV; @@ -20,6 +20,7 @@ use Coro::Signal; use Coro::Semaphore; use Coro::AIO; +use Coro::BDB; use Coro::Storable; use Coro::Util (); @@ -3632,23 +3633,7 @@ { BDB::min_parallel 8; - BDB::max_poll_time $TICK * 0.1; - $BDB_POLL_WATCHER = EV::io BDB::poll_fileno, EV::READ, \&BDB::poll_cb; - - BDB::set_sync_prepare { - my $status; - my $current = $Coro::current; - ( - sub { - $status = $!; - $current->ready; undef $current; - }, - sub { - Coro::schedule while defined $current; - $! = $status; - }, - ) - }; + BDB::max_poll_reqs $TICK * 0.1; unless ($DB_ENV) { $DB_ENV = BDB::db_env_create;