X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flive_catalyst_test.t;h=e7f8df91ff144b81d734fc534ce5610c11c76f68;hb=gsoc_breadboard_with_app_instance;hp=9fb299f86adfdf7bf1a6bbd1fd66600dc5f61ed9;hpb=ade50bdb79a80b82d1334aa987fe81c16740c0f6;p=catagits%2FCatalyst-Runtime.git diff --git a/t/live_catalyst_test.t b/t/live_catalyst_test.t index 9fb299f..e7f8df9 100644 --- a/t/live_catalyst_test.t +++ b/t/live_catalyst_test.t @@ -5,6 +5,7 @@ use FindBin; use lib "$FindBin::Bin/lib"; use Catalyst::Test 'TestApp', {default_host => 'default.com'}; use Catalyst::Request; +use HTTP::Request::Common; use Test::More; @@ -44,5 +45,10 @@ my $req = '/dump/request'; is( $creq->uri->host, $opts{host}, 'target host is mutable via options hashref' ); } +{ + my $response = request( POST( '/bodyparams', { override => 'this' } ) )->content; + is($response, 'that', 'body param overridden'); +} + done_testing;