View | Details | Raw Unified | Return to bug 35959
Collapse All | Expand All

(-)a/Koha/Biblio/Metadata/Extractor/MARC.pm (-4 / +2 lines)
Lines 27-35 use Modern::Perl; Link Here
27
27
28
use Koha::Exceptions;
28
use Koha::Exceptions;
29
29
30
use Koha::Biblio::Metadata::Extractor::MARC::MARC21;
31
use Koha::Biblio::Metadata::Extractor::MARC::UNIMARC;
32
33
=head1 API
30
=head1 API
34
31
35
=head2 Class methods
32
=head2 Class methods
Lines 58-63 sub new { Link Here
58
        unless $valid_schemas->{$schema};
55
        unless $valid_schemas->{$schema};
59
56
60
    my $sub_class = "Koha::Biblio::Metadata::Extractor::MARC::$schema";
57
    my $sub_class = "Koha::Biblio::Metadata::Extractor::MARC::$schema";
58
    require "Koha/Biblio/Metadata/Extractor/MARC/$schema.pm";
59
61
    return $sub_class->new($params);
60
    return $sub_class->new($params);
62
}
61
}
63
62
64
- 

Return to bug 35959