/[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 102 by dpavlin, Fri Jul 11 23:01:54 2008 UTC revision 624 by dpavlin, Sat Nov 29 17:47:34 2008 UTC
# Line 3  package Strix::Schema; Line 3  package Strix::Schema;
3  use Fey::ORM::Schema;  use Fey::ORM::Schema;
4  use Frey::Schema;  use Frey::Schema;
5    
6  my $dsn = 'dbi:Pg:dbname=new';  sub debug { 0 } # FIXME fake
7  $dsn = 'dbi:SQLite:dbname=./var/strix.sqlite';  with 'Frey::Config';
8    my $dsn = __PACKAGE__->config( __PACKAGE__ )->{dsn}; # FIXME yaaaack
9    
10  my ( $schema, $source ) = Frey::Schema->schema_source( $dsn );  my ( $schema, $source ) = Frey::Schema->schema_source( $dsn );
11    
12  has_schema $schema;  has_schema $schema;
13    
14  warn Strix::Schema->SQLFactoryClass();  #warn Strix::Schema->SQLFactoryClass();
15    
16  __PACKAGE__->DBIManager()->add_source($source);  __PACKAGE__->DBIManager()->add_source($source);
17    
18    $source->dbh->do( qq{ set client_encoding = 'utf-8' } ) if $dsn =~ /Pg/;
19    
20  1;  1;
Legend:
Removed from v.102  
changed lines
  Added in v.624
  ViewVC Help
Powered by ViewVC 1.1.26