X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Futf8_content_length.t;h=86297e8496c36fb6d1b4a425f9cda4d5fc7a8d9a;hb=b376e4ecc15edbb0abeb1276710e8da7826daa82;hp=a5eacc41809e5503bd3fb0cdc119363657127f4c;hpb=9d5277eada8c3be7c5310e56d2168cc95fabc22b;p=catagits%2FCatalyst-Runtime.git diff --git a/t/aggregate/utf8_content_length.t b/t/aggregate/utf8_content_length.t index a5eacc4..86297e8 100644 --- a/t/aggregate/utf8_content_length.t +++ b/t/aggregate/utf8_content_length.t @@ -20,13 +20,7 @@ my $size = -s $fn; is $r->code, 200, '/binary OK'; is $r->header('Content-Length'), $size, '/binary correct content length'; } -SKIP: { - # Test that even if what is really binary has been upgraded into character - # octets in perl, then when we output it we get the correct content length. - # The issue was initially described in the thread 'Avoiding UTF8 in - # Catalyst': http://lists.scsys.co.uk/pipermail/catalyst/2009-November/023912.html. - # FIXME! (See ml thread re 5.80015 release) - skip 'Known not to work on Win32', 2 if ($^O eq 'MSWin32'); +{ my $r = request('/binary_utf8'); is $r->code, 200, '/binary_utf8 OK'; is $r->header('Content-Length'), $size, '/binary_utf8 correct content length';