X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F01-columns.t;h=ca1040e2fafff11957e2f708377b8d3c64804070;hb=8fe001e1f588a2a35923a74d262cd011466d31aa;hp=50d58313b31746960ce8d679b7f0705abe9d9c98;hpb=ea2e61bf5bb7187dc5e56513cd66c272d71d5074;p=dbsrgits%2FDBIx-Class.git diff --git a/t/01-columns.t b/t/01-columns.t index 50d5831..ca1040e 100644 --- a/t/01-columns.t +++ b/t/01-columns.t @@ -87,7 +87,7 @@ ok(!State->find_column('HGLAGAGlAG'), '!find_column HGLAGAGlAG'); { SKIP: { - skip "Different error message", 1; + skip "No column objects", 1; eval { my @grps = State->__grouper->groups_for("Huh"); }; ok $@, "Huh not in groups"; @@ -101,7 +101,6 @@ ok(!State->find_column('HGLAGAGlAG'), '!find_column HGLAGAGlAG'); } SKIP: { - skip "->retrieve not yet supported by CDBI compat", 1; local $SIG{__WARN__} = sub { }; eval { DBIx::Class->retrieve(1) }; like $@, qr/Can't retrieve unless primary columns are defined/, "Need primary key for retrieve";