[Bast-commits] r9498 - DBIx-Class/0.08/branches/rs_UD_cleanup/t/resultset

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2010-05-31 23:24:54 +0100 (Mon, 31 May 2010)
New Revision: 9498

Modified:
   DBIx-Class/0.08/branches/rs_UD_cleanup/t/resultset/update_delete.t
Log:
Test cleanup

Modified: DBIx-Class/0.08/branches/rs_UD_cleanup/t/resultset/update_delete.t
===================================================================
--- DBIx-Class/0.08/branches/rs_UD_cleanup/t/resultset/update_delete.t	2010-05-31 22:20:38 UTC (rev 9497)
+++ DBIx-Class/0.08/branches/rs_UD_cleanup/t/resultset/update_delete.t	2010-05-31 22:24:54 UTC (rev 9498)
@@ -128,6 +128,9 @@
   { prefetch => 'liner_notes' },
 )->delete;
 
+$schema->storage->debugobj ($orig_debugobj);
+$schema->storage->debug ($orig_debug);
+
 is_same_sql_bind (
   $sql,
   \@bind,