[Bast-commits] r6747 - DBIx-Class/0.08/branches/mssql_top_fixes/t

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2009-06-20 22:01:54 +0000 (Sat, 20 Jun 2009)
New Revision: 6747

Modified:
   DBIx-Class/0.08/branches/mssql_top_fixes/t/746mssql.t
Log:
Really fix tests

Modified: DBIx-Class/0.08/branches/mssql_top_fixes/t/746mssql.t
===================================================================
--- DBIx-Class/0.08/branches/mssql_top_fixes/t/746mssql.t	2009-06-20 22:01:09 UTC (rev 6746)
+++ DBIx-Class/0.08/branches/mssql_top_fixes/t/746mssql.t	2009-06-20 22:01:54 UTC (rev 6747)
@@ -47,7 +47,7 @@
 my %seen_id;
 
 # fresh $schema so we start unconnected
-$schema = DBICTest::Schema->connect($dsn, $user, $pass, {AutoCommit => 1});
+$schema = DBICTest::Schema->connect($dsn, $user, $pass);
 
 # test primary key handling
 my $new = $schema->resultset('Artist')->create({ name => 'foo' });
@@ -137,6 +137,7 @@
 #
 
 {
+$schema->debug (1);
   # try a ->has_many direction (group_by is not possible on has_many with limit)
   my $owners = $schema->resultset ('Owners')->search ({
       'books.id' => { '!=', undef }