[open-ils-commits] r11123 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ

[svn at svn.open-ils.org]

Author: erickson
Date: 2008-11-10 17:17:25 -0500 (Mon, 10 Nov 2008)
New Revision: 11123

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
Log:
return hold status with queue stats

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm	2008-11-10 21:53:48 UTC (rev 11122)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm	2008-11-10 22:17:25 UTC (rev 11123)
@@ -660,7 +660,7 @@
 	api_name	=> "open-ils.circ.hold.queue_stats.retrieve",
     signature => {
         desc => q/
-            Returns object with total_holds count, queue_position, and potential_copies count
+            Returns object with total_holds count, queue_position, potential_copies count, and status code
         /
     }
 );
@@ -703,7 +703,8 @@
     return {
         total_holds => scalar(@$hold_ids),
         queue_position => $pos,
-        potential_copies => scalar(@$potentials)
+        potential_copies => scalar(@$potentials),
+        status => _hold_status($e, $hold)
     };
 }