/[SQLSession]/trunk/lib/SQLSession/Bootstrap.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/SQLSession/Bootstrap.pm

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

revision 2 by dpavlin, Sat Dec 2 00:08:50 2006 UTC revision 4 by dpavlin, Sat Dec 2 13:10:08 2006 UTC
# Line 21  sub run { Line 21  sub run {
21                  dsn => 'DBI:Pg:dbname=test',                  dsn => 'DBI:Pg:dbname=test',
22          );          );
23    
24            my $p = SQLSession::Model::Page->new(current_user => $system_user);
25            $p->create(
26                    name => 'test query',
27                    sql_query => 'select * from a;',
28                    on_database => $db,
29            );
30    
31  }  }
32    
33  1;  1;
Legend:
Removed from v.2  
changed lines
  Added in v.4
  ViewVC Help
Powered by ViewVC 1.1.26