Add faceted search code

diff --git a/acqui/addorder.pl b/acqui/addorder.pl
index 97687d4..79c0867 100755 (executable)
--- a/acqui/addorder.pl
+++ b/acqui/addorder.pl
@@ -189,7 +189,6 @@ my $xmlhash=XMLkoha2marc($dbh,$biblio,"biblios");
 $biblionumber = NEWnewbiblio($dbh,$xmlhash,"");
 
             ModStatus( $suggestionid, 'ORDERED', '', $biblionumber,$input );
-warn "modstatus";
         }
     }## biblio didnot exist now created
 
@@ -222,5 +221,5 @@ else {
 #    $biblionumber = $input->param('biblionumber');
     DelOrder( $biblionumber, $ordnum,$loggedinuser );
 }
-warn "goingout";
+
 print $input->redirect("basket.pl?basketno=$basketno");

diff --git a/acqui/newordersuggestion.pl b/acqui/newordersuggestion.pl
index 0571d5e..52e3091 100755 (executable)
--- a/acqui/newordersuggestion.pl
+++ b/acqui/newordersuggestion.pl
@@ -148,7 +148,7 @@ foreach (@$suggestions_loop) {
                        push @value, $_->{publishercode};
                }
        
-               my ($nbresult,@finalresult) = ZEBRAsearch_kohafields(\@kohafields,\@value,\@relation,"",\@and_or,0,"",0,1);
+               my ($nbresult,$facets,@finalresult) = ZEBRAsearch_kohafields(\@kohafields,\@value,\@relation,"",\@and_or,0,"",0,1);
 
                # there is at least 1 result => return the 1st one
                if ($nbresult) {