Parent Directory | Revision Log
r702@eeepy: dpavlin | 2008-11-29 17:41:26 +0100 configure all dsn setting in config file
1 | dpavlin | 2 | package Strix::Schema; |
2 | |||
3 | use Fey::ORM::Schema; | ||
4 | dpavlin | 102 | use Frey::Schema; |
5 | dpavlin | 2 | |
6 | dpavlin | 621 | my $dsn = __PACKAGE__->config( __PACKAGE__ )->{dsn}; # FIXME yaaaack |
7 | dpavlin | 15 | |
8 | dpavlin | 102 | my ( $schema, $source ) = Frey::Schema->schema_source( $dsn ); |
9 | dpavlin | 2 | |
10 | has_schema $schema; | ||
11 | |||
12 | dpavlin | 143 | #warn Strix::Schema->SQLFactoryClass(); |
13 | dpavlin | 57 | |
14 | dpavlin | 2 | __PACKAGE__->DBIManager()->add_source($source); |
15 | dpavlin | 55 | |
16 | dpavlin | 169 | $source->dbh->do( qq{ set client_encoding = 'utf-8' } ) if $dsn =~ /Pg/; |
17 | |||
18 | dpavlin | 55 | 1; |
ViewVC Help | |
Powered by ViewVC 1.1.26 |