[Bast-commits] r3296 - branches/DBIx-Class-current/t

[matthewt at dev.catalyst.perl.org]

Author: matthewt
Date: 2007-05-11 04:03:40 +0100 (Fri, 11 May 2007)
New Revision: 3296

Modified:
   branches/DBIx-Class-current/t/89dbicadmin.t
Log:
autocommit error gone for dbicadmin test

Modified: branches/DBIx-Class-current/t/89dbicadmin.t
===================================================================
--- branches/DBIx-Class-current/t/89dbicadmin.t	2007-05-11 02:56:11 UTC (rev 3295)
+++ branches/DBIx-Class-current/t/89dbicadmin.t	2007-05-11 03:03:40 UTC (rev 3296)
@@ -23,7 +23,7 @@
 # tests run on windows as well
 
 my $employees = $schema->resultset('Employee');
-my $cmd = qq|$^X script/dbicadmin --schema=DBICTest::Schema --class=Employee --tlibs --connect="['dbi:SQLite:dbname=t/var/DBIxClass.db','','']" --force --tlibs|;
+my $cmd = qq|$^X script/dbicadmin --schema=DBICTest::Schema --class=Employee --tlibs --connect="['dbi:SQLite:dbname=t/var/DBIxClass.db','','',{AutoCommit:1}]" --force --tlibs|;
 
 `$cmd --op=insert --set="{name:'Matt'}"`;
 ok( ($employees->count()==1), 'insert count' );