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

(-)a/Koha/MetaSearcher.pm (-2 / +2 lines)
Lines 21-27 use Modern::Perl; Link Here
21
21
22
use base 'Class::Accessor';
22
use base 'Class::Accessor';
23
23
24
use C4::Charset qw( MarcToUTF8Record );
24
use C4::Charset qw( MarcToUTF8Record SetUTF8Flag );
25
use C4::Search qw(); # Purely for new_record_from_zebra
25
use C4::Search qw(); # Purely for new_record_from_zebra
26
use DBIx::Class::ResultClass::HashRefInflator;
26
use DBIx::Class::ResultClass::HashRefInflator;
27
use IO::Select;
27
use IO::Select;
Lines 298-303 sub _import_record { Link Here
298
298
299
    my ( $marcrecord ) = MarcToUTF8Record( $raw, $marcflavour, $encoding ); #ignores charset return values
299
    my ( $marcrecord ) = MarcToUTF8Record( $raw, $marcflavour, $encoding ); #ignores charset return values
300
300
301
    SetUTF8Flag($marcrecord);
301
    return $marcrecord;
302
    return $marcrecord;
302
}
303
}
303
304
304
- 

Return to bug 18051