Commit | Line | Data |
2f381252 |
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 ) = @_; |
c09cc357 |
8 | $c->res->body( $c->uri_for('foo/bar')->rel($c->req->base)->path ); |
2f381252 |
9 | } |
10 | |
11 | 1; |