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=c057ae860545285e5812b5ba86ea992e203be773 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;