From d791a9a022b091ac4f5725953c122f24fde01cf1 Mon Sep 17 00:00:00 2001 From: erickson Date: Tue, 20 Oct 2009 00:21:09 +0000 Subject: [PATCH] clear shelf_time when hold is reset git-svn-id: svn://svn.open-ils.org/ILS/trunk@14501 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm index 020f99a75b..2f149ef9f1 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm @@ -1080,6 +1080,7 @@ sub _reset_hold { $hold->clear_capture_time; $hold->clear_current_copy; + $hold->clear_shelf_time; $e->update_action_hold_request($hold) or return $e->event; $e->commit; @@ -1837,6 +1838,7 @@ sub find_hold_mvr { $volume = $e->retrieve_asset_call_number($copy->call_number); } + # TODO return metarcord mvr for M holds my $title = $e->retrieve_biblio_record_entry($tid); return ( $U->record_to_mvr($title), $volume, $copy ); } -- 2.11.0