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

diff --git a/t/lib/DBICTest/Schema/Link.pm b/t/lib/DBICTest/Schema/Link.pm
index bf6d623..50ddf3f 100644
--- a/t/lib/DBICTest/Schema/Link.pm
+++ b/t/lib/DBICTest/Schema/Link.pm
@@ -1,11 +1,11 @@
 package # hide from PAUSE
     DBICTest::Schema::Link;
 
-use base qw/DBICTest::BaseResult/;
-
 use strict;
 use warnings;
 
+use base qw/DBICTest::BaseResult/;
+
 __PACKAGE__->table('link');
 __PACKAGE__->add_columns(
     'id' => {
@@ -25,6 +25,8 @@ __PACKAGE__->add_columns(
 );
 __PACKAGE__->set_primary_key('id');
 
+__PACKAGE__->has_many ( bookmarks => 'DBICTest::Schema::Bookmark', 'link', { cascade_delete => 0 } );
+
 use overload '""' => sub { shift->url }, fallback=> 1;
 
 1;