unknownplace.org

ためしに CLON の CLON::Model::DBIC を Schema::Loader ベースにしてみた。

CLON::Model::DBIC Rev.224

sub table {
    my ( $self, $table ) = @_;
    __PACKAGE__->resultset( $self->loader->monikers->{$table} );
}

こんなコードを入れておくことにより、Catalyst::Model::DBIC 互換な $c->model('DBIC')->table('table_name') がそのまま利用でき、CLON はこの書き方をしていたのでこのファイルを書き換えるだけで他は何も変更しなくて良かった。

といってもこれじゃ別に Schema の恩恵にまったくあずかれないし、相変わらず Class::C3 はうるさいし、あんまりいいことない。