[svn:p5ee] r10142 - p5ee/trunk/App-WorkQueue/lib/App

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
@[EMAIL PROTECTED]
 -501,6 +501,10 @[EMAIL PROTECTED]
                     }
                     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);