hashRef must return something false otherwise while loops go forever.

This commit is contained in:
Colin Kuskie 2006-01-20 22:10:01 +00:00
parent fd3fb924f3
commit 6eb27ce938

View file

@ -179,13 +179,7 @@ Returns the next row of data in the form of a hash reference.
sub hashRef {
my $self = shift;
my ($hashRef, %hash);
$hashRef = $self->sth->fetchrow_hashref();
if (defined $hashRef) {
return $hashRef;
} else {
return {};
}
return $self->sth->fetchrow_hashref();
}