[Bast-commits] r7192 -
DBIx-Class/0.08/branches/multicreate_fixes/t/multi_create
ribasushi at dev.catalyst.perl.org
ribasushi at dev.catalyst.perl.org
Tue Aug 4 13:39:07 GMT 2009
Author: ribasushi
Date: 2009-08-04 13:39:05 +0000 (Tue, 04 Aug 2009)
New Revision: 7192
Modified:
DBIx-Class/0.08/branches/multicreate_fixes/t/multi_create/standard.t
Log:
Remove bogus test - the real test is in t/multi_create/has_many.t
Modified: DBIx-Class/0.08/branches/multicreate_fixes/t/multi_create/standard.t
===================================================================
--- DBIx-Class/0.08/branches/multicreate_fixes/t/multi_create/standard.t 2009-08-04 13:20:35 UTC (rev 7191)
+++ DBIx-Class/0.08/branches/multicreate_fixes/t/multi_create/standard.t 2009-08-04 13:39:05 UTC (rev 7192)
@@ -6,7 +6,7 @@
use lib qw(t/lib);
use DBICTest;
-plan tests => 93;
+plan tests => 91;
my $schema = DBICTest->init_schema();
@@ -329,26 +329,6 @@
}, 'Nested find_or_create');
lives_ok ( sub {
- my $artist2 = $schema->resultset('Artist')->create({
- name => 'Fred 4',
- cds => [
- {
- title => 'Music to code by',
- year => 2007,
- },
- ],
- cds_unordered => [
- {
- title => 'Music to code by',
- year => 2007,
- },
- ]
- });
-
- is($artist2->in_storage, 1, 'artist with duplicate rels inserted okay');
-}, 'Multiple same level has_many create');
-
-lives_ok ( sub {
my $artist = $schema->resultset('Artist')->first;
my $cd_result = $artist->create_related('cds', {
More information about the Bast-commits
mailing list