From: erickson Date: Wed, 20 Sep 2006 14:22:03 +0000 (+0000) Subject: setting copy back to reshelving if the aborted transit was a hold transit X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=d6dab62e28c2ad57a8a5ed0ba1fff941e7a54cbd;p=Evergreen.git setting copy back to reshelving if the aborted transit was a hold transit git-svn-id: svn://svn.open-ils.org/ILS/trunk@6155 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Transit.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Transit.pm index 796ce4353c..89812c7365 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Transit.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Transit.pm @@ -243,6 +243,11 @@ sub __abort_transit { my $holdtransit = $e->retrieve_action_hold_transit_copy($transit->id); + if( $holdtransit ) { + $logger->info("setting copy to reshelving on hold transit abort"); + $copy->status( OILS_COPY_STATUS_RESHELVING ); + } + return $e->event unless $e->delete_action_transit_copy($transit); return $e->event unless $e->update_asset_copy($copy);