when changing the pickup lib of a hold that is already on the shelf, create a hold...

git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_4_0@14689 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 3aef62d..7655dff 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
@@ -569,7 +569,8 @@ sub transit_hold {
 
     $logger->info("putting hold into transit on pickup_lib update");
 
-    my $transit = Fieldmapper::action::transit_copy->new;
+    my $transit = Fieldmapper::action::hold_transit_copy->new;
+    $transit->hold($hold->id);
     $transit->source($src);
     $transit->dest($dest);
     $transit->target_copy($copy->id);
@@ -580,7 +581,7 @@ sub transit_hold {
     $copy->editor($e->requestor->id);
     $copy->edit_date('now');
 
-    $e->create_action_transit_copy($transit) or return $e->die_event;
+    $e->create_action_hold_transit_copy($transit) or return $e->die_event;
     $e->update_asset_copy($copy) or return $e->die_event;
     return undef;
 }