From d07e6928233dd01e278b8d1424dae8264f41d211 Mon Sep 17 00:00:00 2001
From: Nick Clemens <nick@bywatersolutions.com>
Date: Mon, 16 May 2022 19:51:41 +0000
Subject: [PATCH] Bug 30778: Remove ModAuthInBatch

1 - git grep ModAuthInBatch
2 - Confirm none of these occurences are calls
3 - Apply patch
4 - git grep ModAuthInBatch
5 - No occurences

Signed-off-by: David Nind <david@davidnind.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
---
 C4/ImportBatch.pm | 14 --------------
 1 file changed, 14 deletions(-)

diff --git a/C4/ImportBatch.pm b/C4/ImportBatch.pm
index 7d6aa0c917..216018dffa 100644
--- a/C4/ImportBatch.pm
+++ b/C4/ImportBatch.pm
@@ -328,20 +328,6 @@ sub AddAuthToBatch {
     return $import_record_id;
 }
 
-=head2 ModAuthInBatch
-
-  ModAuthInBatch($import_record_id, $marc_record);
-
-=cut
-
-sub ModAuthInBatch {
-    my ($import_record_id, $marc_record) = @_;
-
-    my $marcflavour = C4::Context->preference('marcflavour');
-    _update_import_record_marc($import_record_id, $marc_record, $marcflavour eq 'UNIMARC' ? 'UNIMARCAUTH' : 'USMARC');
-
-}
-
 =head2 BatchStageMarcRecords
 
 ( $batch_id, $num_records, $num_items, @invalid_records ) =
-- 
2.39.5