Bug 23695: Set holding branch to transferring branch when manually initiating a transfer

[koha.git] / C4 / RotatingCollections.pm

diff --git a/C4/RotatingCollections.pm b/C4/RotatingCollections.pm
index a4477fa..c41d578 100644 (file)
--- a/C4/RotatingCollections.pm
+++ b/C4/RotatingCollections.pm
@@ -446,7 +446,13 @@ sub TransferCollection {
     while ( my $item = $sth->fetchrow_hashref ) {
         my ($status) = CheckReserves( $item->{itemnumber} );
         my @transfers = C4::Circulation::GetTransfers( $item->{itemnumber} );
-        C4::Circulation::transferbook( $colBranchcode, $item->{barcode}, 1, 'RotatingCollection' ) unless ( $status eq 'Waiting' || @transfers );
+        C4::Circulation::transferbook({
+            from_branch => $item->holdingbranch,
+            to_branch => $colBranchcode,
+            barcode => $item->{barcode},
+            ignore_reserves => 1,
+            trigger => 'RotatingCollection'
+        }) unless ( $status eq 'Waiting' || @transfers );
     }
 
     return 1;