leaving items "on holds shelf" when their hold is cancelled

git-svn-id: svn://svn.open-ils.org/ILS/trunk@6726 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 7dbf550..a0da315 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
@@ -441,11 +441,12 @@ sub cancel_hold {
                        or return $e->event;
 
                if( $copy->status == OILS_COPY_STATUS_ON_HOLDS_SHELF ) {
-                       $logger->info("setting copy to status 'reshelving' on hold cancel");
-                       $copy->status(OILS_COPY_STATUS_RESHELVING);
-                       $copy->editor($e->requestor->id);
-                       $copy->edit_date('now');
-                       $e->update_asset_copy($copy) or return $e->event;
+         $logger->info("canceling hold $holdid whose item is on the holds shelf");
+#                      $logger->info("setting copy to status 'reshelving' on hold cancel");
+#                      $copy->status(OILS_COPY_STATUS_RESHELVING);
+#                      $copy->editor($e->requestor->id);
+#                      $copy->edit_date('now');
+#                      $e->update_asset_copy($copy) or return $e->event;
 
                } elsif( $copy->status == OILS_COPY_STATUS_IN_TRANSIT ) {
 
@@ -461,7 +462,6 @@ sub cancel_hold {
                                        $trans->copy_status( OILS_COPY_STATUS_RESHELVING );
                                        $e->update_action_transit_copy($trans) or return $e->die_event;
                                }
-                               
                        }
                }
        }