X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FSchema%2FEncoded.pm;h=aab5d9fab5046b48204148ce8f657f7247d0750d;hb=4a233f3019d2baa4bf2abee0c873c74d5cdf3a11;hp=7fd77dcbe3aaa135a15ea2c22a407230899e5151;hpb=660cf1be74795a5a5784f413741816413a724c1a;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/lib/DBICTest/Schema/Encoded.pm b/t/lib/DBICTest/Schema/Encoded.pm
index 7fd77dc..aab5d9f 100644
--- a/t/lib/DBICTest/Schema/Encoded.pm
+++ b/t/lib/DBICTest/Schema/Encoded.pm
@@ -1,11 +1,11 @@
 package # hide from PAUSE
     DBICTest::Schema::Encoded;
 
-use base qw/DBICTest::BaseResult/;
-
 use strict;
 use warnings;
 
+use base qw/DBICTest::BaseResult/;
+
 __PACKAGE__->table('encoded');
 __PACKAGE__->add_columns(
     'id' => {
@@ -21,6 +21,8 @@ __PACKAGE__->add_columns(
 
 __PACKAGE__->set_primary_key('id');
 
+__PACKAGE__->has_many (keyholders => 'DBICTest::Schema::Employee', 'encoded');
+
 sub set_column {
   my ($self, $col, $value) = @_;
   if( $col eq 'encoded' ){