From 794e3dd0e03b008b66b584502905c22afbf6d6ff Mon Sep 17 00:00:00 2001
From: Julian Maurice <julian.maurice@biblibre.com>
Date: Fri, 5 Apr 2024 14:08:31 +0200
Subject: [PATCH] Bug 35959: Fix C3 merge of
 Koha::Biblio::Metadata::Extractor::MARC::*

Test plan:

Run the following commands:

  perl -c Koha/Biblio/Metadata/Extractor/MARC/MARC21.pm
  perl -c Koha/Biblio/Metadata/Extractor/MARC/UNIMARC.pm

They should all print 'syntax OK'
---
 Koha/Biblio/Metadata/Extractor/MARC.pm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/Koha/Biblio/Metadata/Extractor/MARC.pm b/Koha/Biblio/Metadata/Extractor/MARC.pm
index bf030f601b..ceaabf2aa1 100644
--- a/Koha/Biblio/Metadata/Extractor/MARC.pm
+++ b/Koha/Biblio/Metadata/Extractor/MARC.pm
@@ -27,9 +27,6 @@ use Modern::Perl;
 
 use Koha::Exceptions;
 
-use Koha::Biblio::Metadata::Extractor::MARC::MARC21;
-use Koha::Biblio::Metadata::Extractor::MARC::UNIMARC;
-
 =head1 API
 
 =head2 Class methods
@@ -58,6 +55,8 @@ sub new {
         unless $valid_schemas->{$schema};
 
     my $sub_class = "Koha::Biblio::Metadata::Extractor::MARC::$schema";
+    require "Koha/Biblio/Metadata/Extractor/MARC/$schema.pm";
+
     return $sub_class->new($params);
 }
 
-- 
2.30.2