--- trunk/lib/Frey/SQL.pm 2008/11/19 15:28:23 455 +++ trunk/lib/Frey/SQL.pm 2008/11/24 20:47:56 493 @@ -40,8 +40,8 @@ my $dbh=DBI->connect('dbi:AnyData(RaiseError=>1):'); - my $data = $self->as_sponge->{rows}; - unshift @$data, $self->as_sponge->{NAME}; + my $data = $self->sponge->{rows}; + unshift @$data, $self->sponge->{NAME}; warn "# data = ",dump( $data ) if $self->debug;