[Bast-commits] r9114 - DBIx-Class/0.08/trunk/t

ribasushi at dev.catalyst.perl.org ribasushi at dev.catalyst.perl.org
Fri Apr 9 12:16:23 GMT 2010


Author: ribasushi
Date: 2010-04-09 13:16:23 +0100 (Fri, 09 Apr 2010)
New Revision: 9114

Modified:
   DBIx-Class/0.08/trunk/t/85utf8.t
Log:
Use a sloppy but recommended fix for Test warnings

Modified: DBIx-Class/0.08/trunk/t/85utf8.t
===================================================================
--- DBIx-Class/0.08/trunk/t/85utf8.t	2010-04-09 11:29:32 UTC (rev 9113)
+++ DBIx-Class/0.08/trunk/t/85utf8.t	2010-04-09 12:16:23 UTC (rev 9114)
@@ -91,9 +91,8 @@
   }
 }
 
-# there's some weird bug in Test::Builder that spews out wide-character warnings
-# without any print taking place
-$SIG{__WARN__} = sub { warn $_[0] unless $_[0] =~ /Wide character in print/ };
+# as per http://search.cpan.org/dist/Test-Simple/lib/Test/More.pm#utf8
+binmode (Test::More->builder->$_, ':utf8') for qw/output failure_output todo_output/;
 
 my $bytestream_title = my $utf8_title = "weird \x{466} stuff";
 utf8::encode($bytestream_title);




More information about the Bast-commits mailing list