Reformat the JSON test for Shop/Tax.t

Add JSON tets to Shop/Transaction.t
Reindent several methods in SQL/ResultSet.pm
add a method for returning a YUI Data Table structure to SQL.pm
This commit is contained in:
Colin Kuskie 2008-03-19 04:33:24 +00:00
parent 94b03aa3f5
commit 4db53bb8ed
5 changed files with 94 additions and 13 deletions

View file

@ -68,8 +68,8 @@ Returns the next row of data as an array reference. Note that this is 12% faster
=cut
sub arrayRef {
my $self = shift;
return $self->sth->fetchrow_arrayref() or $self->db->session->errorHandler->fatal("Couldn't fetch array. ".$self->errorMessage);
my $self = shift;
return $self->sth->fetchrow_arrayref() or $self->db->session->errorHandler->fatal("Couldn't fetch array. ".$self->errorMessage);
}
@ -82,8 +82,8 @@ A reference to the current WebGUI::SQL object.
=cut
sub db {
my $self = shift;
return $self->{_db};
my $self = shift;
return $self->{_db};
}
#-------------------------------------------------------------------