C4::SearchMarc is deprecated now.
This commit is contained in:
parent
6abda1a918
commit
7be8934406
|
|
@ -82,7 +82,7 @@ use C4::Auth; # get_template_and_user
|
|||
use C4::Interface::CGI::Output;
|
||||
use C4::Suggestions;
|
||||
use C4::Biblio;
|
||||
use C4::SearchMarc;
|
||||
use C4::Search;
|
||||
|
||||
my $input = new CGI;
|
||||
|
||||
|
|
@ -100,7 +100,7 @@ my $isbn = $input->param('isbn');
|
|||
my $duplicateNumber = $input->param('duplicateNumber');
|
||||
my $suggestionid = $input->param('suggestionid');
|
||||
|
||||
my $status = 'ACCEPTED';
|
||||
my $status = 'ACCEPTED'; # the suggestion had to be accepeted before to order it.
|
||||
my $suggestedbyme = -1; # search ALL suggestors
|
||||
my $op = $input->param('op');
|
||||
$op = 'else' unless $op;
|
||||
|
|
@ -157,11 +157,12 @@ foreach (@$suggestions_loop) {
|
|||
push @value, $_->{publishercode};
|
||||
}
|
||||
|
||||
my ($finalresult,$nbresult) = C4::SearchMarc::catalogsearch($dbh,\@tags,\@and_or,\@excluding,\@operator,\@value,0,10);
|
||||
my ($finalresult,$nbresult) = catalogsearch($dbh,\@tags,\@and_or,\@excluding,\@operator,\@value,0,10);
|
||||
|
||||
# there is at least 1 result => return the 1st one
|
||||
if ($nbresult) {
|
||||
# warn "$nbresult => ".@$finalresult[0]->{biblionumber},@$finalresult[0]->{bibid},@$finalresult[0]->{title};
|
||||
# warn "DUPLICATE ==>".@$finalresult[0]->{biblionumber},@$finalresult[0]->{bibid},@$finalresult[0]->{title};
|
||||
#warn "$nbresult => ".@$finalresult[0]->{biblionumber},@$finalresult[0]->{bibid},@$finalresult[0]->{title};
|
||||
#warn "DUPLICATE ==>".@$finalresult[0]->{biblionumber},@$finalresult[0]->{bibid},@$finalresult[0]->{title};
|
||||
$_->{duplicateBiblionumber} = @$finalresult[0]->{biblionumber};
|
||||
}
|
||||
}
|
||||
|
|
|
|||
|
|
@ -29,7 +29,6 @@ use C4::Auth;
|
|||
use C4::Output;
|
||||
use C4::Interface::CGI::Output;
|
||||
use C4::AuthoritiesMarc;
|
||||
use C4::SearchMarc;
|
||||
use C4::Acquisition;
|
||||
use C4::Koha; # XXX subfield_is_koha_internal_p
|
||||
|
||||
|
|
|
|||
|
|
@ -31,7 +31,7 @@ use C4::Output;
|
|||
use C4::Interface::CGI::Output;
|
||||
use C4::Biblio;
|
||||
use C4::Acquisition;
|
||||
use C4::SearchMarc;
|
||||
#use C4::SearchMarc;
|
||||
use C4::Koha; # XXX subfield_is_koha_internal_p
|
||||
|
||||
# Creates a scrolling list with the associated default value.
|
||||
|
|
|
|||
Loading…
Reference in New Issue