update distar url

[catagits/Catalyst-Runtime.git] / t / lib / TestApp / Controller / Engine / Response / Print.pm

diff --git a/t/lib/TestApp/Controller/Engine/Response/Print.pm b/t/lib/TestApp/Controller/Engine/Response/Print.pm
index 8d986f8..7fc719f 100644 (file)
--- a/t/lib/TestApp/Controller/Engine/Response/Print.pm
+++ b/t/lib/TestApp/Controller/Engine/Response/Print.pm
@@ -5,7 +5,7 @@ use base 'Catalyst::Controller';
 
 sub one :Relative {
     my ( $self, $c ) = @_;
-    
+
     $c->res->print("foo");
 }
 
@@ -19,7 +19,9 @@ sub three :Relative {
     my ( $self, $c ) = @_;
 
     local $, = ',';
+    local $\ = ':';
     $c->res->print(qw/foo bar baz/);
 }
 
+
 1;