SIP2: Return slightly more hold info

We don't have a normal hold queue, but if there is a hold we can call that
the hold queue. So return the ID of the hold that was captured.

Signed-off-by: Thomas Berezansky <tsbere@mvlc.org>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/SIP/Item.pm b/Open-ILS/src/perlmods/lib/OpenILS/SIP/Item.pm
index 71a823d..96a434a 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/SIP/Item.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/SIP/Item.pm
@@ -388,6 +388,7 @@ sub owner {
 
 sub hold_queue {
     my $self = shift;
+    return [$self->{hold}->id] if $self->{hold};
     return [];
 }