From fcaed6ef24084da54d9d91c09072ff04d0070ef2 Mon Sep 17 00:00:00 2001
From: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Date: Fri, 17 Jan 2020 11:25:28 +0000
Subject: [PATCH] Bug 24297: Record 'Manual' trigger transfers

To test:
1 - Apply patches, restart_all
2 - Gi to Circulation->Transfer
3 - Transfer an item
4 - Check the branch transfers table
5 - The reason is set to 'Manual'

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
---
 circ/branchtransfers.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/circ/branchtransfers.pl b/circ/branchtransfers.pl
index ddca4f5e4d..ea9b289d32 100755
--- a/circ/branchtransfers.pl
+++ b/circ/branchtransfers.pl
@@ -127,7 +127,7 @@ defined $barcode and $barcode =~ s/^\s*|\s*$//g;  # FIXME: barcodeInputFilter
 if ($barcode) {
 
     ( $transferred, $messages ) =
-      transferbook( $tobranchcd, $barcode, $ignoreRs );
+      transferbook( $tobranchcd, $barcode, $ignoreRs, 'Manual' );
     my $item = Koha::Items->find({ barcode => $barcode });
     $found = $messages->{'ResFound'};
     if ($transferred) {
-- 
2.39.5