[Koha-patches] [PATCH] Bug 4309 Do not throw error on auth search of multiple fields
Colin Campbell
colin.campbell at ptfs-europe.com
Thu Jan 6 18:49:22 CET 2011
Ensures the multiple search does not throw a 500 error but
allows a single search to be used as well
---
C4/AuthoritiesMarc.pm | 12 +++++++-----
1 files changed, 7 insertions(+), 5 deletions(-)
diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm
index 9421be9..0abd506 100644
--- a/C4/AuthoritiesMarc.pm
+++ b/C4/AuthoritiesMarc.pm
@@ -220,6 +220,7 @@ sub SearchAuthorities {
my $dosearch;
my $and=" \@and " ;
my $q2;
+ my $attr_cnt = 0;
for(my $i = 0 ; $i <= $#{$value} ; $i++)
{
if (@$value[$i]){
@@ -246,15 +247,16 @@ sub SearchAuthorities {
}
$attr =$attr."\"".@$value[$i]."\"";
$q2 .=$attr;
- $dosearch=1;
+ $dosearch=1;
+ ++$attr_cnt;
}#if value
}
##Add how many queries generated
- if ($query=~/\S+/){
- $query= $and.$query.$q2
+ if ($query=~/\S+/){
+ $query= $and x $attr_cnt . $query . $q2;
} else {
- $query=$q2;
- }
+ $query= $q2;
+ }
## Adding order
#$query=' @or @attr 7=2 @attr 1=Heading 0 @or @attr 7=1 @attr 1=Heading 1'.$query if ($sortby eq "HeadingDsc");
my $orderstring= ($sortby eq "HeadingAsc"?
--
1.7.3.4
More information about the Koha-patches
mailing list