replace syslog with warns

[koha-ffzg.git] / serials / acqui-search-result.pl

diff --git a/serials/acqui-search-result.pl b/serials/acqui-search-result.pl
index 6066bdd..4f410bd 100755 (executable)
--- a/serials/acqui-search-result.pl
+++ b/serials/acqui-search-result.pl
@@ -63,20 +63,12 @@ my @suppliers = GetBookSeller($supplier);
 my $count = scalar @suppliers;
 
 #build result page
-my $toggle=0;
 my @loop_suppliers;
 for (my $i=0; $i<$count; $i++) {
     my $orders = GetPendingOrders($suppliers[$i]->{'id'});
     my $ordcount = scalar @$orders;
     
     my %line;
-    if ($toggle==0){
-        $line{even}=1;
-        $toggle=1;
-    } else {
-        $line{even}=0;
-        $toggle=0;
-    }
     $line{aqbooksellerid} =$suppliers[$i]->{'id'};
     $line{name} = $suppliers[$i]->{'name'};
     $line{active} = $suppliers[$i]->{'active'};