[Bast-commits] r4519 - in DBIx-Class/0.08/trunk: lib/DBIx/Class t

[castaway at dev.catalyst.perl.org]

Author: castaway
Date: 2008-06-26 20:51:35 +0100 (Thu, 26 Jun 2008)
New Revision: 4519

Modified:
   DBIx-Class/0.08/trunk/lib/DBIx/Class/Schema.pm
   DBIx-Class/0.08/trunk/t/03podcoverage.t
Log:
Remove setup_connection_class from POD, skip in podcoverage


Modified: DBIx-Class/0.08/trunk/lib/DBIx/Class/Schema.pm
===================================================================
--- DBIx-Class/0.08/trunk/lib/DBIx/Class/Schema.pm	2008-06-26 12:29:45 UTC (rev 4518)
+++ DBIx-Class/0.08/trunk/lib/DBIx/Class/Schema.pm	2008-06-26 19:51:35 UTC (rev 4519)
@@ -613,19 +613,6 @@
   return $schema;
 }
 
-=head2 setup_connection_class
-
-=over 4
-
-=item Arguments: $target, @info
-
-=back
-
-Sets up a database connection class to inject between the schema and the
-subclasses that the schema creates.
-
-=cut
-
 sub setup_connection_class {
   my ($class, $target, @info) = @_;
   $class->inject_base($target => 'DBIx::Class::DB');

Modified: DBIx-Class/0.08/trunk/t/03podcoverage.t
===================================================================
--- DBIx-Class/0.08/trunk/t/03podcoverage.t	2008-06-26 12:29:45 UTC (rev 4518)
+++ DBIx-Class/0.08/trunk/t/03podcoverage.t	2008-06-26 19:51:35 UTC (rev 4519)
@@ -31,6 +31,11 @@
             qw(cursor)
         ]
     },
+    'DBIx::Class::Schema' => {
+        ignore => [
+            qw(setup_connection_class)
+        ]
+    },
     'DBIx::Class::CDBICompat::AccessorMapping'          => { skip => 1 },
     'DBIx::Class::CDBICompat::AbstractSearch' => {
         ignore => [qw(search_where)]