LP#2107404 Update Pickup Lib from staff catalog record doesn't retarget

Llewellyn Marshall · mmorgannoble · commit ce9d75fa0426 · 2025-11-17T16:52:24.000-05:00
flag a hold for retargeting if its copy is cleared due to pickup library change from record's "View Holds" page.

Release-note: Staff Catalog: Retarget the hold when pickup library is
changed.

Signed-off-by: Llewellyn Marshall &lt;llewellyn.marshall@dncr.nc.gov&gt;
Signed-off-by: Gina Monti &lt;gmonti@biblio.org&gt;
Signed-off-by: Steven Mayo &lt;smayo@georgialibraries.org&gt;
Signed-off-by: blake &lt;blake@mobiusconsortium.org&gt;
Signed-off-by: Jane Sandberg &lt;js7389@princeton.edu&gt;
Signed-off-by: Michele Morgan &lt;mmorgan@noblenet.org&gt;
diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Holds.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Holds.pm
@@ -1359,6 +1359,7 @@ sub update_hold_impl {
         } elsif ($hold_status == 2) {
               $logger->info("Pickup location changed and waiting for capture, clear current_copy for hold ".$hold->id);
               $hold->clear_current_copy;
+              $need_retarget = 1;
         }
     }
 

Original file line number	Diff line number	Diff line change
`@@ -1359,6 +1359,7 @@ sub update_hold_impl {`
`1359`	`1359`	`} elsif ($hold_status == 2) {`
`1360`	`1360`	`$logger->info("Pickup location changed and waiting for capture, clear current_copy for hold ".$hold->id);`
`1361`	`1361`	`$hold->clear_current_copy;`
	`1362`	`+ $need_retarget = 1;`
`1362`	`1363`	`}`
`1363`	`1364`	`}`
`1364`	`1365`