leftover debug
Peter Rabbitson [Wed, 21 Jan 2009 13:56:49 +0000 (13:56 +0000)]
t/103many_to_many_warning.t

index f98024c..fa38157 100644 (file)
@@ -27,8 +27,6 @@ plan ( ($] >= 5.009000 and $] < 5.010001)
   my $code = gen_code ( suffix => 2, no_warn => 1 );
   eval "$code";
 
-diag Dumper \@w;
-
   ok ( (not grep { $_ =~ /The many-to-many relationship bars is trying to create/ } @w), "No warning triggered with relevant 'no warnings'");
 }