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

Author: spadkins
Date: Thu Jan 17 08:05:38 2008
New Revision: 10580

Modified:
   p5ee/trunk/App-WorkQueue/lib/App/WorkQueue.pm

Log:
more logging

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	Thu Jan 17 08:05:38 2008
@[EMAIL PROTECTED]
 -661,6 +661,11 @[EMAIL PROTECTED]
         }
     }
 
+    if (!$released) {
+        $context->log("WorkQueue: _release_in_mem: release[$released]
key[$entry_key] entry[$entry->{subrequest_id}
$entry->{actual_data_source}]\n");
+        $context->log("WorkQueue: _release_in_mem: entry_keys[" . join("
", sort(map {$self->_hash_to_key($_)} @[EMAIL PROTECTED]
)) . "]\n");
+    }
+
     &App::sub_exit($released) if ($App::trace);
     return($released);
 }