[Bast-commits] r4768 - in DBIx-Class/0.08/branches/view_support: lib/DBIx/Class/ResultSource t/lib/DBICTest t/lib/DBICTest/Schema

[groditi at dev.catalyst.perl.org]

Author: groditi
Date: 2008-08-25 18:52:56 +0100 (Mon, 25 Aug 2008)
New Revision: 4768

Added:
   DBIx-Class/0.08/branches/view_support/t/lib/DBICTest/Schema/Year2000CDs.pm
Modified:
   DBIx-Class/0.08/branches/view_support/lib/DBIx/Class/ResultSource/View.pm
   DBIx-Class/0.08/branches/view_support/t/lib/DBICTest/Schema.pm
Log:
perl -Ilib -It/lib -MDBICTest::Schema -e'1'

Modified: DBIx-Class/0.08/branches/view_support/lib/DBIx/Class/ResultSource/View.pm
===================================================================
--- DBIx-Class/0.08/branches/view_support/lib/DBIx/Class/ResultSource/View.pm	2008-08-25 09:19:10 UTC (rev 4767)
+++ DBIx-Class/0.08/branches/view_support/lib/DBIx/Class/ResultSource/View.pm	2008-08-25 17:52:56 UTC (rev 4768)
@@ -8,12 +8,6 @@
 use base qw/DBIx::Class/;
 __PACKAGE__->load_components(qw/ResultSource/);
 
-
-  _columns _primaries _unique_constraints name resultset_attributes
-  schema from _relationships column_info_from_storage source_info
-  source_name/);
-
-
 =head1 NAME
 
 DBIx::Class::ResultSource::Table - Table object

Added: DBIx-Class/0.08/branches/view_support/t/lib/DBICTest/Schema/Year2000CDs.pm
===================================================================
--- DBIx-Class/0.08/branches/view_support/t/lib/DBICTest/Schema/Year2000CDs.pm	                        (rev 0)
+++ DBIx-Class/0.08/branches/view_support/t/lib/DBICTest/Schema/Year2000CDs.pm	2008-08-25 17:52:56 UTC (rev 4768)
@@ -0,0 +1,25 @@
+package # hide from PAUSE 
+    DBICTest::Schema::Year2000CDs;
+
+use base 'DBIx::Class::Core::View';
+
+__PACKAGE__->view('cd');
+__PACKAGE__->view_definition("SELECT cdid, artist, title FROM cd WHERE year ='2000'");
+__PACKAGE__->add_columns(
+  'cdid' => {
+    data_type => 'integer',
+    is_auto_increment => 1,
+  },
+  'artist' => {
+    data_type => 'integer',
+  },
+  'title' => {
+    data_type => 'varchar',
+    size      => 100,
+  },
+
+);
+__PACKAGE__->set_primary_key('cdid');
+__PACKAGE__->add_unique_constraint([ qw/artist title/ ]);
+
+1;

Modified: DBIx-Class/0.08/branches/view_support/t/lib/DBICTest/Schema.pm
===================================================================
--- DBIx-Class/0.08/branches/view_support/t/lib/DBICTest/Schema.pm	2008-08-25 09:19:10 UTC (rev 4767)
+++ DBIx-Class/0.08/branches/view_support/t/lib/DBICTest/Schema.pm	2008-08-25 17:52:56 UTC (rev 4768)
@@ -16,6 +16,7 @@
   #dummy
   Track
   Tag
+  Year2000CDs
   /,
   { 'DBICTest::Schema' => [qw/
     LinerNotes