---
C4/AuthoritiesMarc.pm | 6 ++----
1 files changed, 2 insertions(+), 4 deletions(-)
diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm
index e46cac0..916d5ed 100644
--- a/C4/AuthoritiesMarc.pm
+++ b/C4/AuthoritiesMarc.pm
@@ -251,15 +251,13 @@ sub SearchAuthorities {
push @q2, $querypart;
}
##Add how many queries generated
- my $count=0;
- for my $querypart (@q2){
+ while (my $querypart=shift @q2){
if ($query=~/\S+/){
- $query= (($count<scalar(@q2)-1)?$and:"").$query.$querypart;
+ $query= $and.$query.$querypart;
}
else {
$query= $querypart;
}
- $count++;
}
## Adding order
--
1.6.3.3
_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches
