Lines 601-607
sub GetSubscriptions {
Link Here
|
601 |
my @sqlstrings; |
601 |
my @sqlstrings; |
602 |
my @strings_to_search; |
602 |
my @strings_to_search; |
603 |
@strings_to_search = map { "$_" } split( / /, $ean ); |
603 |
@strings_to_search = map { "$_" } split( / /, $ean ); |
604 |
foreach my $index qw(biblioitems.ean) { |
604 |
foreach my $index ( qw(biblioitems.ean) ) { |
605 |
push @bind_params, @strings_to_search; |
605 |
push @bind_params, @strings_to_search; |
606 |
my $tmpstring = "OR $index = ? " x scalar(@strings_to_search); |
606 |
my $tmpstring = "OR $index = ? " x scalar(@strings_to_search); |
607 |
$debug && warn "$tmpstring"; |
607 |
$debug && warn "$tmpstring"; |
608 |
- |
|
|