X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Faggregate%2Flive_engine_response_print.t;h=96fc5f658d9b1f753416f2932ba1cfe0bc9a189a;hp=ad00ea3711d55125b53cfa4c9d772d8fbac5056d;hb=88e5a8b0c4d28e46b8ba6b6b9567063e57af9063;hpb=9c8b81a2bc9a9007be8a6bcb19b0c74a21c39951 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" ); }