Author: spadkins
Date: Tue Oct 30 13:41:44 2007
New Revision: 10142
Modified:
p5ee/trunk/App-WorkQueue/lib/App/WorkQueue.pm
Log:
added some context log information to help us track down the acquire bug in
mvworkd
Modified: p5ee/trunk/App-WorkQueue/lib/App/WorkQueue.pm
==============================================================================
--- p5ee/trunk/App-WorkQueue/lib/App/WorkQueue.pm (original)
+++ p5ee/trunk/App-WorkQueue/lib/App/WorkQueue.pm Tue Oct 30 13:41:44 2007
@@ -501,6 +501,10 @@
}
else {
$self->_release_resources($entry);
+ my $context = $self->{context};
+ my $db = $self->_db();
+ $context->log("ACQUISITION FAILED :
shop_request_id[$entry->{shop_request_id}] :
subrequest_id[$entry->{subrequest_id}] :
request_status[$entry->{request_status}] : last sql stmt[$db->{sql}]\n");
+ $entry = undef;
# the following line appears to have been a bug
#$self->_maintain_queue_buffers("release",$entry);
#$self->_maintain_queue_buffers("unacquire",$entry);