[Bast-commits] r6857 - DBIx-Class/0.08/branches/table_name_ref/t

[caelum at dev.catalyst.perl.org]

Author: caelum
Date: 2009-06-29 21:46:54 +0000 (Mon, 29 Jun 2009)
New Revision: 6857

Modified:
   DBIx-Class/0.08/branches/table_name_ref/t/76select.t
Log:
removing debug statement

Modified: DBIx-Class/0.08/branches/table_name_ref/t/76select.t
===================================================================
--- DBIx-Class/0.08/branches/table_name_ref/t/76select.t	2009-06-29 21:45:19 UTC (rev 6856)
+++ DBIx-Class/0.08/branches/table_name_ref/t/76select.t	2009-06-29 21:46:54 UTC (rev 6857)
@@ -64,9 +64,6 @@
 cmp_ok ($cds->count, '>', 2, 'Initially populated with more than 2 CDs');
 
 my $table = $cds->result_source->name;
-
-$DB::single = 1;
-
 my $subsel = $cds->search ({}, {
     columns => [qw/cdid title/],
     from => \ "(SELECT cdid, title FROM $table LIMIT 2) me",