--- deliantra/Deliantra-Client/DC/Protocol.pm 2006/05/31 13:44:26 1.14 +++ deliantra/Deliantra-Client/DC/Protocol.pm 2006/06/01 18:56:05 1.15 @@ -270,7 +270,7 @@ # I love transactions for (1..100) { my $txn = $CFClient::DB_ENV->txn_begin; - my $status = $self->{facemap}->db_get (id => $id, BerkeleyDB::DB_RMW); + my $status = $self->{facemap}->db_get (id => $id); if ($status == 0 || $status == BerkeleyDB::DB_NOTFOUND) { $id = ($id || 16) + 1; if ($self->{facemap}->put (id => $id) == 0 @@ -280,7 +280,7 @@ goto gotid; } } - $txn->abort; + $txn->txn_abort; } CFClient::fatal "maximum number of transaction retries reached - database problems?";