'forward_to_uri_check request');
ok( $response->is_success, 'forward_to_uri_check successful');
- is( $response->content, '/action/forward/foo/bar',
+ is( $response->content, 'action/forward/foo/bar',
'forward_to_uri_check correct namespace');
}
'TestApp::Controller::Action::Regexp',
'Test Class'
);
- my $location = $response->header('location');
- $location =~ s/localhost(:\d+)?/localhost/;
is(
- $location,
- $url,
+ $response->header('location'),
+ $response->request->uri,
'Redirect URI is the same as the request URI'
);
}
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;