This commit is contained in:
Matthew Wilson 2006-05-07 14:40:07 +00:00
parent 067170b8c9
commit fd32315866

View file

@ -220,8 +220,9 @@ An array reference containing values for any placeholder params used in the SQL
sub buildArrayRefOfHashRefs { sub buildArrayRefOfHashRefs {
my @array; my @array;
my $sth = $_[0]->read($_[1],$_[2]); my $sth = $_[0]->read($_[1],$_[2]);
while ($sth->hashRef) { my $data;
push(@array,$_); while ($data = $sth->hashRef) {
push(@array,$data);
} }
$sth->finish; $sth->finish;
return \@array; return \@array;