X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestAppEncoding%2FController%2FRoot.pm;h=391a2cdc30783f8621ea26e5e474266ae9306e45;hb=b42b9094c7f1a5cf0cb7750255ea6b0a1de45ddf;hp=b5b3eeb7bd004844e9beed176a1142edf0bd2a1b;hpb=5ab21903f27011f38ec3e32ef2e649065e7adc1e;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/lib/TestAppEncoding/Controller/Root.pm b/t/lib/TestAppEncoding/Controller/Root.pm
index b5b3eeb..391a2cd 100644
--- a/t/lib/TestAppEncoding/Controller/Root.pm
+++ b/t/lib/TestAppEncoding/Controller/Root.pm
@@ -8,7 +8,7 @@ __PACKAGE__->config->{namespace} = '';
 
 sub binary : Local {
     my ($self, $c) = @_;
-    $c->res->body(do { open(my $fh, '<', $c->path_to('..', '..', 'catalyst_130pix.gif')) or die $!; local $/ = undef; <$fh>; });
+    $c->res->body(do { open(my $fh, '<', $c->path_to('..', '..', 'catalyst_130pix.gif')) or die $!; binmode($fh); local $/ = undef; <$fh>; });
 }
 
 sub binary_utf8 : Local {