Fix a slight bug in 18136, and the alt pull list printing interface works again.

git-svn-id: svn://svn.open-ils.org/ILS/trunk@18148 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
index 7b37e28..8fb7874 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
@@ -1415,7 +1415,7 @@ sub print_hold_pull_list_stream {
     my @chunk;
     for my $hid (@$holds_ids) {
         push @chunk, $e->retrieve_action_hold_request([
-            $_->{"id"}, {
+            $hid->{"id"}, {
                 "flesh" => 3,
                 "flesh_fields" => {
                     "ahr" => ["usr", "current_copy"],