1 package DBICTest::Schema::TreeLike;
3 use base qw/DBIx::Class/;
5 __PACKAGE__->load_components(qw/PK::Auto::SQLite Core/);
7 __PACKAGE__->table('treelike');
8 __PACKAGE__->add_columns(
9 'id' => { data_type => 'integer', is_auto_increment => 1 },
10 'parent' => { data_type => 'integer' },
11 'name' => { data_type => 'varchar' },
13 __PACKAGE__->set_primary_key(qw/id/);
14 __PACKAGE__->belongs_to('parent', 'TreeLike',
15 { 'foreign.id' => 'self.parent' });