|
Lines 55-60
use Koha::Patrons;
Link Here
|
| 55 |
use Koha::Virtualshelves; |
55 |
use Koha::Virtualshelves; |
| 56 |
use Koha::Plugins; |
56 |
use Koha::Plugins; |
| 57 |
use Koha::SearchEngine::Search; |
57 |
use Koha::SearchEngine::Search; |
|
|
58 |
use Koha::SearchEngine::QueryBuilder; |
| 58 |
|
59 |
|
| 59 |
my $query = CGI->new(); |
60 |
my $query = CGI->new(); |
| 60 |
|
61 |
|
|
Lines 132-139
if ( $xslfile ) {
Link Here
|
| 132 |
my $searcher = Koha::SearchEngine::Search->new( |
133 |
my $searcher = Koha::SearchEngine::Search->new( |
| 133 |
{ index => $Koha::SearchEngine::BIBLIOS_INDEX } |
134 |
{ index => $Koha::SearchEngine::BIBLIOS_INDEX } |
| 134 |
); |
135 |
); |
|
|
136 |
my $builder = Koha::SearchEngine::QueryBuilder->new( |
| 137 |
{ index => $Koha::SearchEngine::BIBLIOS_INDEX } ); |
| 138 |
|
| 135 |
my $cleaned_title = $biblio->title; |
139 |
my $cleaned_title = $biblio->title; |
| 136 |
$cleaned_title =~ tr|/||; |
140 |
$cleaned_title =~ tr|/||; |
|
|
141 |
$cleaned_title = $builder->_clean_search_term($cleaned_title); |
| 142 |
|
| 137 |
my $query = |
143 |
my $query = |
| 138 |
( C4::Context->preference('UseControlNumber') and $record->field('001') ) |
144 |
( C4::Context->preference('UseControlNumber') and $record->field('001') ) |
| 139 |
? 'rcn:'. $record->field('001')->data . ' AND (bib-level:a OR bib-level:b)' |
145 |
? 'rcn:'. $record->field('001')->data . ' AND (bib-level:a OR bib-level:b)' |
| 140 |
- |
|
|