From f5583efd7be0a4390475e607bc85d4255dde0718 Mon Sep 17 00:00:00 2001 From: tipaul Date: Mon, 2 Jul 2007 09:14:09 +0000 Subject: [PATCH] minor code rewritte --- C4/Overdues.pm | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) diff --git a/C4/Overdues.pm b/C4/Overdues.pm index 440a0fc1a0..9306ed005c 100644 --- 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 -- 2.20.1