/[Frey]/trunk/lib/Strix/Schema.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/Strix/Schema.pm

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

revision 15 by dpavlin, Sun Jun 29 00:49:50 2008 UTC revision 35 by dpavlin, Mon Jun 30 07:12:56 2008 UTC
# Line 7  use Fey::ORM::Schema; Line 7  use Fey::ORM::Schema;
7    
8  use Storable;  use Storable;
9  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
10    use URI::Escape;
11    
12  my $schema_file = 'var/schema.storable';  my $dsn = 'dbi:Pg:dbname=new';
13    $dsn = 'dbi:SQLite:dbname=./var/strix.sqlite';
14    
15  my $source = Fey::DBIManager::Source->new( dsn => 'dbi:Pg:dbname=new' );  my $schema_file = 'var/schema.' . uri_escape( $dsn );
16    
17    warn "Database $dsn schema cache $schema_file\n";
18    
19    my $source = Fey::DBIManager::Source->new( dsn => $dsn );
20    
21  my $schema;  my $schema;
22  if ( -e $schema_file ) {  if ( -e $schema_file ) {
Legend:
Removed from v.15  
changed lines
  Added in v.35
  ViewVC Help
Powered by ViewVC 1.1.26