X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=Koha%2FSuggestionEngine.pm;h=e3ee1c9d905a40cf154d9ebf6325352d7db1efcf;hb=9c5e40e4923179bf0b2b630d3e09797dc4c1fdb0;hp=0d977c1e222c47f699ec3c1cbeb6166552c936d3;hpb=8471158160b760f614be3b4f3c39297808b117d6;p=koha.git

diff --git a/Koha/SuggestionEngine.pm b/Koha/SuggestionEngine.pm
index 0d977c1e22..e3ee1c9d90 100644
--- a/Koha/SuggestionEngine.pm
+++ b/Koha/SuggestionEngine.pm
@@ -87,7 +87,7 @@ sub new {
     my $options = $param->{options} || '';
     my @plugins = ();
 
-    foreach my $plugin ( $param->{plugins} ) {
+    foreach my $plugin ( @{$param->{plugins}} ) {
         next unless $plugin;
         my $plugin_module =
             $plugin =~ m/:/
@@ -141,15 +141,18 @@ sub get_suggestions {
 
     my %suggestions;
 
+    my $index = scalar @{ $self->plugins };
+
     foreach my $pluginobj ( @{ $self->plugins } ) {
         next unless $pluginobj;
         my $pluginres = $pluginobj->get_suggestions($param);
         foreach my $suggestion (@$pluginres) {
             $suggestions{ $suggestion->{'search'} }->{'relevance'} +=
-              $suggestion->{'relevance'};
+              $suggestion->{'relevance'} * $index;
             $suggestions{ $suggestion->{'search'} }->{'label'} |=
               $suggestion->{'label'};
         }
+        $index--;
     }
 
     my @results = ();