From: Mike Rylander <mrylander@gmail.com>
Date: Wed, 19 Sep 2018 15:16:39 +0000 (-0400)
Subject: LP#1791335: Retain stat cats on item transfer
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=8cdf97e8c608d10d41287d5f32f500badad9e2a4;p=contrib%2FConifer.git

LP#1791335: Retain stat cats on item transfer

For some reason, parts were protected during item transfer, but stat cats were
not.  This commit protects them by fleshing stat cat entries in the outer
item transfer method.

Signed-off-by: Mike Rylander <mrylander@gmail.com>
Signed-off-by: Bill Erickson <berickxx@gmail.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat.pm
index 95a748a109..dd8c730ccf 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat.pm
@@ -858,7 +858,7 @@ sub transfer_copies_to_volume {
             { id => $copy_id , deleted => 'f' },
             {
                 flesh => 1,
-                flesh_fields => { acp => ['parts'] }
+                flesh_fields => { acp => ['parts', 'stat_cat_entries'] }
             }
         ])->[0];
         return OpenILS::Event->new('ASSET_COPY_NOT_FOUND') if !$copy;