Add strict/warnings test, adjust all offenders (wow, that was a lot)
[dbsrgits/DBIx-Class.git] / t / lib / DBICTest / Schema / TwoKeyTreeLike.pm
index 9547baf..b28fc48 100644 (file)
@@ -1,9 +1,10 @@
-package # hide from PAUSE 
+package # hide from PAUSE
     DBICTest::Schema::TwoKeyTreeLike;
 
-use base qw/DBIx::Class/;
+use warnings;
+use strict;
 
-__PACKAGE__->load_components(qw/Core/);
+use base qw/DBICTest::BaseResult/;
 
 __PACKAGE__->table('twokeytreelike');
 __PACKAGE__->add_columns(
@@ -16,7 +17,8 @@ __PACKAGE__->add_columns(
  },
 );
 __PACKAGE__->set_primary_key(qw/id1 id2/);
-__PACKAGE__->belongs_to('parent', 'TwoKeyTreeLike',
+__PACKAGE__->add_unique_constraint('tktlnameunique' => ['name']);
+__PACKAGE__->belongs_to('parent', 'DBICTest::Schema::TwoKeyTreeLike',
                           { 'foreign.id1' => 'self.parent1', 'foreign.id2' => 'self.parent2'});
 
 1;