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

(-)a/Koha/Biblio.pm (-1 / +4 lines)
Lines 43-48 use Koha::Suggestions; Link Here
43
use Koha::Subscriptions;
43
use Koha::Subscriptions;
44
use Koha::SearchEngine;
44
use Koha::SearchEngine;
45
use Koha::SearchEngine::Search;
45
use Koha::SearchEngine::Search;
46
use Koha::SearchEngine::QueryBuilder;
46
47
47
=head1 NAME
48
=head1 NAME
48
49
Lines 512-517 Returns a query which can be used to search for all component parts of MARC21 bi Link Here
512
sub get_components_query {
513
sub get_components_query {
513
    my ($self) = @_;
514
    my ($self) = @_;
514
515
516
    my $builder = Koha::SearchEngine::QueryBuilder->new(
517
        { index => $Koha::SearchEngine::BIBLIOS_INDEX } );
515
    my $marc = $self->metadata->record;
518
    my $marc = $self->metadata->record;
516
519
517
    my $searchstr;
520
    my $searchstr;
Lines 542-547 sub get_components_query { Link Here
542
    else {
545
    else {
543
        my $cleaned_title = $marc->title;
546
        my $cleaned_title = $marc->title;
544
        $cleaned_title =~ tr|/||;
547
        $cleaned_title =~ tr|/||;
548
        $cleaned_title = $builder->clean_search_term($cleaned_title);
545
        $searchstr = "Host-item:($cleaned_title)";
549
        $searchstr = "Host-item:($cleaned_title)";
546
    }
550
    }
547
551
548
- 

Return to bug 11175