From: Tomas Doran <bobtfish@bobtfish.net>
Date: Wed, 19 Jan 2011 00:43:18 +0000 (+0000)
Subject: Merge arcanez stuff and mine
X-Git-Tag: 1.08~104
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Action-Serialize-Data-Serializer.git;a=commitdiff_plain;h=ad995b48033f9bc3131fe5b34b86db7e2e94f641

Merge arcanez stuff and mine
---

ad995b48033f9bc3131fe5b34b86db7e2e94f641
diff --cc t/catalyst-action-serialize.t
index dfdbcec,43d793d..ffaf231
--- a/t/catalyst-action-serialize.t
+++ b/t/catalyst-action-serialize.t
@@@ -1,6 -1,6 +1,7 @@@
  use strict;
  use warnings;
 -use Test::More tests => 11;
++
 +use Test::More 0.88;
  use Data::Serializer;
  use FindBin;
  
@@@ -35,17 -35,8 +36,17 @@@ $res2 = request($t->get(url => '/serial
  ok( $res2->is_success, 'request succeeded (deprecated config)' );
  is( $res2->content, "{'lou' => 'is my cat'}", "request returned proper data");
  
 -my $emptyres = request($t->get(url => '/serialize/empty'));
 -is $emptyres->content, '';
 -ok !$emptyres->header('Content-Length');
+ 
 -1;
 +$res = request($t->get(url => '/serialize/empty_serialized'));
 +is $res->content, q[{'foo' => 'bar'}], 'normal case ok';
 +ok $res->header('Content-Length'), 'set content-length when we serialize';
 +
 +$res = request($t->get(url => '/serialize/empty_not_serialized_undef'));
 +is $res->content, '', "body explicitly set to undef results in '' content";
 +ok !$res->header('Content-Length'), "body explicitly set to undef - no automatic content-length";
 +
 +$res = request($t->get(url => '/serialize/empty_not_serialized_blank'));
 +is $res->content, '', "body explicitly set to '' results in '' content";
 +ok !$res->header('Content-Length'), "body explicitly set to '' - no automatic content-length";
 +
 +done_testing;
-