[Bast-commits] r3899 - in trunk/DBIx-Class-Schema-Loader: . t/lib

[ilmari at dev.catalyst.perl.org]

Author: ilmari
Date: 2007-12-14 04:58:03 +0000 (Fri, 14 Dec 2007)
New Revision: 3899

Modified:
   trunk/DBIx-Class-Schema-Loader/Changes
   trunk/DBIx-Class-Schema-Loader/t/lib/dbixcsl_common_tests.pm
Log:
Fix test skip count for main skip_rels block

Modified: trunk/DBIx-Class-Schema-Loader/Changes
===================================================================
--- trunk/DBIx-Class-Schema-Loader/Changes	2007-12-14 04:51:35 UTC (rev 3898)
+++ trunk/DBIx-Class-Schema-Loader/Changes	2007-12-14 04:58:03 UTC (rev 3899)
@@ -1,5 +1,8 @@
 Revision history for Perl extension DBIx::Class::Schema::Loader
 
+Not yet released
+        - Fix test skip count for main skip_rels block
+
 0.04004 Thu Nov 15, 2007
         - Fix Win32 test skip counts for good (RT #30568, Kenichi Ishigaki)
         - Default Oracle db_schema to db username (patch

Modified: trunk/DBIx-Class-Schema-Loader/t/lib/dbixcsl_common_tests.pm
===================================================================
--- trunk/DBIx-Class-Schema-Loader/t/lib/dbixcsl_common_tests.pm	2007-12-14 04:51:35 UTC (rev 3898)
+++ trunk/DBIx-Class-Schema-Loader/t/lib/dbixcsl_common_tests.pm	2007-12-14 04:58:03 UTC (rev 3899)
@@ -244,7 +244,7 @@
     is( $obj2->id, 2 );
 
     SKIP: {
-        skip $self->{skip_rels}, 42 if $self->{skip_rels};
+        skip $self->{skip_rels}, 50 if $self->{skip_rels};
 
         my $moniker3 = $monikers->{loader_test3};
         my $class3   = $classes->{loader_test3};