Refactoring, basic cursor support, additional syntax supported by HasMany
[dbsrgits/DBIx-Class.git] / t / cdbi-t / 01-columns.t
index 6b3346c..0841e1e 100644 (file)
@@ -37,7 +37,7 @@ use base 'DBIx::Class';
 
 City->table('City');
 City->columns(All => qw/Name State Population/);
-#City->has_a(State => 'State');
+City->has_a(State => 'State');
 
 
 #-------------------------------------------------------------------------
@@ -95,12 +95,12 @@ ok(!State->find_column('HGLAGAGlAG'), '!find_column HGLAGAGlAG');
 
        my @grps = sort State->__grouper->groups_for(State->_find_columns(qw/rain capital/));
        is @grps, 2, "Rain and Capital = 2 groups";
-        @grps = sort @grps; # Because DBIx::Class is hash-based
+        @grps = sort @grps; # Because the underlying API is hash-based
        is $grps[0], 'Other',   " - Other";
        is $grps[1], 'Weather', " - Weather";
 }
 
-SKIP: {
+{
        local $SIG{__WARN__} = sub { };
        eval { DBIx::Class->retrieve(1) };
        like $@, qr/Can't retrieve unless primary columns are defined/, "Need primary key for retrieve";