[Bast-commits] r4841 - DBIx-Class/0.08/trunk/t

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2008-09-22 01:34:54 +0100 (Mon, 22 Sep 2008)
New Revision: 4841

Modified:
   DBIx-Class/0.08/trunk/t/93single_accessor_object.t
Log:
Make t/93single_accessor_object.t work under DBICTEST_SQLT_DEPLOY=1, although I am not quite sure how and why it passed with the stock sqlite.sql

Modified: DBIx-Class/0.08/trunk/t/93single_accessor_object.t
===================================================================
--- DBIx-Class/0.08/trunk/t/93single_accessor_object.t	2008-09-22 00:10:14 UTC (rev 4840)
+++ DBIx-Class/0.08/trunk/t/93single_accessor_object.t	2008-09-22 00:34:54 UTC (rev 4841)
@@ -56,7 +56,7 @@
 
 {
 	my $artist = $schema->resultset('Artist')->create({ artistid => 666, name => 'bad religion' });
-	my $genre = $schema->resultset('Genre')->create({ name => 'disco' });
+	my $genre = $schema->resultset('Genre')->create({ genreid => 88, name => 'disco' });
 	my $cd = $schema->resultset('CD')->create({ cdid => 187, artist => 1, title => 'how could hell be any worse?', year => 1982 });
 
 	dies_ok { $cd->genre } 'genre accessor throws without column';