X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Flive_engine_response_print.t;h=96fc5f658d9b1f753416f2932ba1cfe0bc9a189a;hb=6c217fb3c36a6e0ac4ef82b839ee3d5ed924e2e5;hp=ad00ea3711d55125b53cfa4c9d772d8fbac5056d;hpb=ae29b412955743885e80350085167b54b69672da;p=catagits%2FCatalyst-Runtime.git diff --git a/t/aggregate/live_engine_response_print.t b/t/aggregate/live_engine_response_print.t index ad00ea3..96fc5f6 100644 --- a/t/aggregate/live_engine_response_print.t +++ b/t/aggregate/live_engine_response_print.t @@ -1,5 +1,3 @@ -#!perl - use strict; use warnings; @@ -12,13 +10,13 @@ use Catalyst::Test 'TestApp'; my $expected = { one => "foo", two => "foobar", - three => "foo,bar,baz", + three => "foo,bar,baz:", }; for my $action ( sort keys %{$expected} ) { ok( my $response = request('http://localhost/engine/response/print/' . $action ), 'Request' ); ok( $response->is_success, "Response $action successful 2xx" ); - + is( $response->content, $expected->{$action}, "Content $action OK" ); }