minor code rewritte

diff --git a/C4/Overdues.pm b/C4/Overdues.pm
index 440a0fc..9306ed0 100644 (file)
--- a/C4/Overdues.pm
+++ b/C4/Overdues.pm
@@ -125,18 +125,13 @@ sub Getoverdues {
     );
     $sth->execute;
 
-    # FIXME - Use push @results
-    my $i = 0;
     my @results;
     while ( my $data = $sth->fetchrow_hashref ) {
-        $results[$i] = $data;
-        $i++;
+        push @results, $data;
     }
     $sth->finish;
 
-    #  print @results;
-    # FIXME - Bogus API.
-    return ( $i, \@results );
+    return \@results;
 }
 
 =head2 checkoverdues