buildArray, buildArrayRef should only use the first column of results

This commit is contained in:
Graham Knop 2008-11-24 16:23:00 +00:00
parent 0be310bb38
commit b6cfd088c7

View file

@ -129,7 +129,7 @@ sub buildArrayRef {
$sth->execute($params);
my @array;
while (my $data = $sth->arrayRef) {
push @array, @$data;
push @array, $data->[0];
}
return \@array;
}