X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FEngine%2FResponse%2FPrint.pm;h=13f3d04888ba9375dfcc75bdd44a3a39186428df;hp=8d986f8215740eb8ed29359ebc81301a98638a02;hb=fe3083a8f05a03e6da5f5b72ef1a2e105a83b4b8;hpb=ae7da8f5d10d2d8b4ada389cd260b4bb9d7b07d5 diff --git a/t/lib/TestApp/Controller/Engine/Response/Print.pm b/t/lib/TestApp/Controller/Engine/Response/Print.pm index 8d986f8..13f3d04 100644 --- a/t/lib/TestApp/Controller/Engine/Response/Print.pm +++ b/t/lib/TestApp/Controller/Engine/Response/Print.pm @@ -19,7 +19,9 @@ sub three :Relative { my ( $self, $c ) = @_; local $, = ','; + local $\ = ':'; $c->res->print(qw/foo bar baz/); } + 1;