[Bast-commits] r3668 - DBIx-Class/0.08/trunk/lib/DBIx/Class

[ash at dev.catalyst.perl.org]

Author: ash
Date: 2007-08-11 22:46:59 +0100 (Sat, 11 Aug 2007)
New Revision: 3668

Modified:
   DBIx-Class/0.08/trunk/lib/DBIx/Class/Row.pm
Log:
Remove warn statement

Modified: DBIx-Class/0.08/trunk/lib/DBIx/Class/Row.pm
===================================================================
--- DBIx-Class/0.08/trunk/lib/DBIx/Class/Row.pm	2007-08-10 13:05:24 UTC (rev 3667)
+++ DBIx-Class/0.08/trunk/lib/DBIx/Class/Row.pm	2007-08-11 21:46:59 UTC (rev 3668)
@@ -188,7 +188,6 @@
 
       foreach my $p (@pri) {
         if (exists $keyhash->{$p}) {
-          warn $keyhash->{$p};
           unless (defined($rel_obj->get_column($keyhash->{$p}))
                   || $rel_obj->column_info($keyhash->{$p})
                              ->{is_auto_increment}) {