From c14951baee89f00b2de5fe898258683d2322ba40 Mon Sep 17 00:00:00 2001
From: Tomas Cohen Arazi <tomascohen@theke.io>
Date: Mon, 24 Oct 2022 14:03:44 -0300
Subject: [PATCH] Revert "Bug 15187: Index 880 in Zebra the same as
 Elasticsearch"

This reverts commit 85690a14f8685a2eb6cb88316bb4a3145c024cc2.
---
 Koha/Filter/MARC/Index880InZebra.pm   | 88 -----------------------------------
 misc/migration_tools/rebuild_zebra.pl |  1 -
 2 files changed, 89 deletions(-)
 delete mode 100644 Koha/Filter/MARC/Index880InZebra.pm

diff --git a/Koha/Filter/MARC/Index880InZebra.pm b/Koha/Filter/MARC/Index880InZebra.pm
deleted file mode 100644
index 4250e00633..0000000000
--- a/Koha/Filter/MARC/Index880InZebra.pm
+++ /dev/null
@@ -1,88 +0,0 @@
-package Koha::Filter::MARC::Index880InZebra;
-
-# This file is part of Koha.
-#
-# Koha is free software; you can redistribute it and/or modify it
-# under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 3 of the License, or
-# (at your option) any later version.
-#
-# Koha is distributed in the hope that it will be useful, but
-# WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with Koha; if not, see <http://www.gnu.org/licenses>.
-
-=head1 NAME
-
-Koha::Filter::MARC::Index880InZebra - replace 880 with its linked field number
-so that the alternate graphic representation gets indexed appropriately
-(see Koha::SearchEngine::Elasticsearch for the ES version)
-
-=head1 SYNOPSIS
-
-  my $processor = Koha::RecordProcessor->new({ filters => ('Index880InZebra') });
-
-=head1 DESCRIPTION
-
-Filter to rewrite 880 to linked field
-
-=cut
-
-use Modern::Perl;
-
-use C4::Context;
-
-use base qw(Koha::RecordProcessor::Base);
-our $NAME = 'Index880InZebra';
-
-our $marcflavour = lc C4::Context->preference('marcflavour');
-
-=head2 filter
-
-    my $newrecord = $filter->filter($record);
-    my $newrecords = $filter->filter(\@records);
-
-=cut
-
-sub filter {
-    my $self = shift;
-    my $record = shift;
-    my $newrecord;
-
-    return unless defined $record;
-
-    if (ref $record eq 'ARRAY') {
-        my @recarray;
-        foreach my $thisrec (@$record) {
-            push @recarray, _processrecord($thisrec);
-        }
-        $newrecord = \@recarray;
-    } elsif (ref $record eq 'MARC::Record') {
-        $newrecord = _processrecord($record);
-    }
-
-    return $newrecord;
-}
-
-sub _processrecord {
-
-    my $record = shift;
-    if ($marcflavour && $marcflavour eq 'marc21'){
-        my @fields = $record->field('880');
-        foreach my $field (@fields){
-            my $sub6 = $field->subfield('6');
-            if ($sub6 =~ /^(...)-\d+/) {
-                my $tag = $1;
-                if ($tag){
-                    $field->set_tag($tag);
-                }
-            }
-        }
-    }
-    return $record;
-}
-
-1;
diff --git a/misc/migration_tools/rebuild_zebra.pl b/misc/migration_tools/rebuild_zebra.pl
index a73e7bdd2f..ec19ce1f5c 100755
--- a/misc/migration_tools/rebuild_zebra.pl
+++ b/misc/migration_tools/rebuild_zebra.pl
@@ -663,7 +663,6 @@ sub get_corrected_marc_record {
             push @filters, 'EmbedItemsAvailability';
             push @filters, 'EmbedSeeFromHeadings'
                 if C4::Context->preference('IncludeSeeFromInSearches');
-            push @filters, 'Index880InZebra';
 
             my $normalizer = Koha::RecordProcessor->new( { filters => \@filters } );
             $marc = $normalizer->process($marc);
-- 
2.11.0