Remove testsuite's assumptions about where it's mounted on a web server
[catagits/Catalyst-Runtime.git] / t / lib / TestApp / Controller / Action / ForwardTo.pm
1 package TestApp::Controller::Action::ForwardTo;
2
3 use strict;
4 use base 'TestApp::Controller::Action';
5
6 sub uri_check : Private {
7     my ( $self, $c ) = @_;
8     $c->res->body( $c->uri_for('foo/bar')->rel($c->req->base)->path );
9 }
10
11 1;