/[Frey]/trunk/lib/Frey/SQL.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey/SQL.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 492 by dpavlin, Wed Nov 19 15:28:23 2008 UTC revision 493 by dpavlin, Mon Nov 24 20:47:56 2008 UTC
# Line 40  sub as_data { Line 40  sub as_data {
40    
41          my $dbh=DBI->connect('dbi:AnyData(RaiseError=>1):');          my $dbh=DBI->connect('dbi:AnyData(RaiseError=>1):');
42    
43          my $data = $self->as_sponge->{rows};          my $data = $self->sponge->{rows};
44          unshift @$data, $self->as_sponge->{NAME};          unshift @$data, $self->sponge->{NAME};
45    
46          warn "# data = ",dump( $data ) if $self->debug;          warn "# data = ",dump( $data ) if $self->debug;
47    
Legend:
Removed from v.492  
changed lines
  Added in v.493
  ViewVC Help
Powered by ViewVC 1.1.26