X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FMyApp1%2FSchema%2FResult%2FCD.pm;fp=t%2Flib%2FMyApp1%2FSchema%2FResult%2FCD.pm;h=2e5b58cdb24b2914b27b33650a7bee78c5e7ec04;hb=731e8b3e4dc45f47f80dfb89f34fac156fbe526f;hp=0000000000000000000000000000000000000000;hpb=7f92017a08dce9905018015070808338e02cf966;p=dbsrgits%2FDBIx-Class-Schema-ResultSetAccessors.git diff --git a/t/lib/MyApp1/Schema/Result/CD.pm b/t/lib/MyApp1/Schema/Result/CD.pm new file mode 100644 index 0000000..2e5b58c --- /dev/null +++ b/t/lib/MyApp1/Schema/Result/CD.pm @@ -0,0 +1,10 @@ +package MyApp1::Schema::Result::CD; +use base qw/DBIx::Class::Core/; + +__PACKAGE__->load_components(qw/InflateColumn::DateTime/); +__PACKAGE__->table('cd'); +__PACKAGE__->add_columns(qw/ cdid artistid title year /); +__PACKAGE__->set_primary_key('cdid'); +__PACKAGE__->belongs_to(artist => 'MyApp1::Schema::Result::Artist', 'artistid'); + +1; \ No newline at end of file