Attachment #105411 for bug #25616

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




                push @link_loop, {
                    limit    => $subject_limit,
                    'link'   => $linkvalue,
                    operator => (scalar @link_loop) ? ' AND ' : undef
                };
            }
            my @this_link_loop = @link_loop;

                push @link_loop, {
                    limit    => 'au',
                    'link'   => $linkvalue,
                    operator => (scalar @link_loop) ? ' AND ' : undef
                };
            }
            my @this_link_loop = @link_loop;


            push @link_loop, {
                'link' => $linkvalue,
                operator => (scalar @link_loop) ? ' AND ' : undef
            };

            if ($volume_number) {





    if ($index) {
        push @marclist, $index;
        push @and_or,   'AND';
        push @operator, $self->{'match_type'};
        push @value,    $self->{'search_form'};
    }

    #    if ($self->{'thesaurus'}) {
    #        push @marclist, 'thesaurus';
    #        push @and_or, 'AND';
    #        push @excluding, '';
    #        push @operator, 'is';
    #        push @value, $self->{'thesaurus'};

Lines 172-178 my $launcher = sub { Link Here

(-)a/cataloguing/value_builder/marc21_linking_section.pl (-1 / +1 lines)
172	my $startfrom = $query->param('startfrom');	172	my $startfrom = $query->param('startfrom');
173	my $resultsperpage = $query->param('resultsperpage') \|\| 20;	173	my $resultsperpage = $query->param('resultsperpage') \|\| 20;
174	my $orderby;	174	my $orderby;
175	my $op = 'and';	175	my $op = 'AND';
176		176
177	my $searcher = Koha::SearchEngine::Search->new(	177	my $searcher = Koha::SearchEngine::Search->new(
178	{ index => $Koha::SearchEngine::BIBLIOS_INDEX } );	178	{ index => $Koha::SearchEngine::BIBLIOS_INDEX } );

Lines 359-365 sub plugin { Link Here

(-)a/cataloguing/value_builder/unimarc_field_4XX.pl (-1 / +1 lines)
359	my $startfrom = $query->param('startfrom');	359	my $startfrom = $query->param('startfrom');
360	my $resultsperpage = $query->param('resultsperpage') \|\| 20;	360	my $resultsperpage = $query->param('resultsperpage') \|\| 20;
361	my $orderby;	361	my $orderby;
362	my $op = 'and';	362	my $op = 'AND';
363	$search = 'kw:'.$search." $op mc-itemtype:".$itype if $itype;	363	$search = 'kw:'.$search." $op mc-itemtype:".$itype if $itype;
364	my $searcher = Koha::SearchEngine::Search->new({index => $Koha::SearchEngine::BIBLIOS_INDEX});	364	my $searcher = Koha::SearchEngine::Search->new({index => $Koha::SearchEngine::BIBLIOS_INDEX});
365	my ( $errors, $results, $total_hits ) = $searcher->simple_search_compat($search, $startfrom * $resultsperpage, $resultsperpage );	365	my ( $errors, $results, $total_hits ) = $searcher->simple_search_compat($search, $startfrom * $resultsperpage, $resultsperpage );

Lines 600-606 sub build_query { Link Here

(-)a/misc/migration_tools/bulkmarcimport.pl (-2 / +2 lines)
600	my $string = build_simplequery($matchingpoint,$record);	600	my $string = build_simplequery($matchingpoint,$record);
601	push @searchstrings,$string if (length($string)>0);	601	push @searchstrings,$string if (length($string)>0);
602	}	602	}
603	my $op = 'and';	603	my $op = 'AND';
604	return join(" $op ",@searchstrings);	604	return join(" $op ",@searchstrings);
605	}	605	}
606	sub build_simplequery {	606	sub build_simplequery {
Lines 616-622 sub build_simplequery { Link Here
616	}	616	}
617	}	617	}
618	}	618	}
619	my $op = 'and';	619	my $op = 'AND';
620	return join(" $op ",@searchstrings);	620	return join(" $op ",@searchstrings);
621	}	621	}
622	sub report_item_errors {	622	sub report_item_errors {

Lines 92-98 if ( $op eq "do_search" && $query ) { Link Here

(-)a/serials/subscription-bib-search.pl (-2 / +1 lines)
92	# add the limits if applicable	92	# add the limits if applicable
93	my $itemtypelimit = $input->param('itemtypelimit');	93	my $itemtypelimit = $input->param('itemtypelimit');
94	my $ccodelimit = $input->param('ccodelimit');	94	my $ccodelimit = $input->param('ccodelimit');
95	my $op = 'and';	95	my $op = 'AND';
96	$query .= " $op $itype_or_itemtype:$itemtypelimit" if $itemtypelimit;	96	$query .= " $op $itype_or_itemtype:$itemtypelimit" if $itemtypelimit;
97	$query .= " $op ccode:$ccodelimit" if $ccodelimit;	97	$query .= " $op ccode:$ccodelimit" if $ccodelimit;
98	$debug && warn $query;	98	$debug && warn $query;
99	-

Return to bug 25616

Lines 1603-1609 sub GetMarcSubjects { Link Here

(-)a/C4/Biblio.pm (-3 / +3 lines)
1603	push @link_loop, {	1603	push @link_loop, {
1604	limit => $subject_limit,	1604	limit => $subject_limit,
1605	'link' => $linkvalue,	1605	'link' => $linkvalue,
1606	operator => (scalar @link_loop) ? ' and ' : undef	1606	operator => (scalar @link_loop) ? ' AND ' : undef
1607	};	1607	};
1608	}	1608	}
1609	my @this_link_loop = @link_loop;	1609	my @this_link_loop = @link_loop;
Lines 1702-1708 sub GetMarcAuthors { Link Here
1702	push @link_loop, {	1702	push @link_loop, {
1703	limit => 'au',	1703	limit => 'au',
1704	'link' => $linkvalue,	1704	'link' => $linkvalue,
1705	operator => (scalar @link_loop) ? ' and ' : undef	1705	operator => (scalar @link_loop) ? ' AND ' : undef
1706	};	1706	};
1707	}	1707	}
1708	my @this_link_loop = @link_loop;	1708	my @this_link_loop = @link_loop;
Lines 1840-1846 sub GetMarcSeries { Link Here
1840		1840
1841	push @link_loop, {	1841	push @link_loop, {
1842	'link' => $linkvalue,	1842	'link' => $linkvalue,
1843	operator => (scalar @link_loop) ? ' and ' : undef	1843	operator => (scalar @link_loop) ? ' AND ' : undef
1844	};	1844	};
1845		1845
1846	if ($volume_number) {	1846	if ($volume_number) {

Lines 202-215 sub _search { Link Here

(-)a/C4/Heading.pm (-2 / +2 lines)
202		202
203	if ($index) {	203	if ($index) {
204	push @marclist, $index;	204	push @marclist, $index;
205	push @and_or, 'and';	205	push @and_or, 'AND';
206	push @operator, $self->{'match_type'};	206	push @operator, $self->{'match_type'};
207	push @value, $self->{'search_form'};	207	push @value, $self->{'search_form'};
208	}	208	}
209		209
210	# if ($self->{'thesaurus'}) {	210	# if ($self->{'thesaurus'}) {
211	# push @marclist, 'thesaurus';	211	# push @marclist, 'thesaurus';
212	# push @and_or, 'and';	212	# push @and_or, 'AND';
213	# push @excluding, '';	213	# push @excluding, '';
214	# push @operator, 'is';	214	# push @operator, 'is';
215	# push @value, $self->{'thesaurus'};	215	# push @value, $self->{'thesaurus'};