1 |
package Reblog::Schema; |
package Reblog::Schema; |
2 |
|
use base qw/DBIx::Class::Schema::Loader/; |
3 |
|
|
4 |
use Fey::ORM::Schema; |
__PACKAGE__->loader_options( |
5 |
|
relationships => 1, |
6 |
sub debug { 0 } # FIXME fake |
debug => 1, |
|
with 'Frey::Config'; |
|
|
my $dsn = __PACKAGE__->config( __PACKAGE__ )->{dsn}; # FIXME yaaaack |
|
|
|
|
|
my ( $schema, $source ) = Frey::Schema->schema_source( $dsn ); |
|
|
|
|
|
has_schema $schema; |
|
|
|
|
|
# fixup MySQL schema (hooray!) |
|
|
|
|
|
$schema->add_foreign_key( |
|
|
Fey::FK->new( |
|
|
source_columns => [ $schema->table('feeds')->column('id') ], |
|
|
target_columns => [ $schema->table('items')->column('feed_id') ], |
|
|
) |
|
7 |
); |
); |
8 |
|
|
|
__PACKAGE__->DBIManager()->add_source($source); |
|
|
|
|
|
#$source->dbh->do( qq{ set client_encoding = 'utf-8' } ) if $dsn =~ /Pg/; |
|
|
|
|
|
warn "## dsn $dsn"; |
|
|
|
|
9 |
1; |
1; |