X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi%2Ftestlib%2FMyStarLinkMCPK.pm;h=1173163be60832843565a79d18fd7c9621556690;hb=961d79dbe25ef8a92e867fcc84914b4bf568c11d;hp=dfc3ff22bf6a0da63cdb97423069e196dba2d524;hpb=50891152d0b24649bfd67bdba97feec86b11c064;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/cdbi/testlib/MyStarLinkMCPK.pm b/t/cdbi/testlib/MyStarLinkMCPK.pm index dfc3ff2..1173163 100644 --- a/t/cdbi/testlib/MyStarLinkMCPK.pm +++ b/t/cdbi/testlib/MyStarLinkMCPK.pm @@ -1,13 +1,14 @@ -package # hide from PAUSE +package # hide from PAUSE MyStarLinkMCPK; +use warnings; +use strict; + use base 'MyBase'; use MyStar; use MyFilm; -use strict; - # This is a many-to-many mapping table that uses the two foreign keys # as its own primary key - there's no extra 'auto-inc' column here @@ -18,7 +19,7 @@ __PACKAGE__->has_a(film => 'MyFilm'); __PACKAGE__->has_a(star => 'MyStar'); sub create_sql { - return qq{ + return qq{ film INTEGER NOT NULL, star INTEGER NOT NULL, PRIMARY KEY (film, star)