Parent Directory | Revision Log
cleanup
1 | package Strix::Schema; |
2 | |
3 | use Fey::ORM::Schema; |
4 | use Frey::Schema; |
5 | |
6 | sub debug { 0 } # FIXME fake |
7 | with 'Frey::Config'; |
8 | my $dsn = __PACKAGE__->config( __PACKAGE__ )->{dsn}; # FIXME yaaaack |
9 | |
10 | my ( $schema, $source ) = Frey::Schema->schema_source( $dsn ); |
11 | |
12 | has_schema $schema; |
13 | |
14 | #warn Strix::Schema->SQLFactoryClass(); |
15 | |
16 | __PACKAGE__->DBIManager()->add_source($source); |
17 | |
18 | $source->dbh->do( qq{ set client_encoding = 'utf-8' } ) if $dsn =~ /Pg/; |
19 | |
20 | 1; |
ViewVC Help | |
Powered by ViewVC 1.1.26 |