Remove testsuite's assumptions about where it's mounted on a web server

[catagits/Catalyst-Runtime.git] / t / lib / TestApp / Controller / Action / ForwardTo.pm

diff --git a/t/lib/TestApp/Controller/Action/ForwardTo.pm b/t/lib/TestApp/Controller/Action/ForwardTo.pm
index 92db7f2..37a7055 100644 (file)
--- a/t/lib/TestApp/Controller/Action/ForwardTo.pm
+++ b/t/lib/TestApp/Controller/Action/ForwardTo.pm
@@ -5,7 +5,7 @@ use base 'TestApp::Controller::Action';
 
 sub uri_check : Private {
     my ( $self, $c ) = @_;
-    $c->res->body( $c->uri_for('foo/bar')->path );
+    $c->res->body( $c->uri_for('foo/bar')->rel($c->req->base)->path );
 }
 
 1;