-use Test::Most;
+use warnings;
+use strict;
+use Test::More;
{
package MyApp::Controller::Root;
sub top :Chained('root') Args(0) {
my ($self, $c) = @_;
- Test::Most::is $self->action_for('top'), 'top';
- Test::Most::is $self->action_for('story/story'), 'story/story';
+ Test::More::is $self->action_for('top'), 'top';
+ Test::More::is $self->action_for('story/story'), 'story/story';
+ }
+
+ sub default : Path {
+
+ my ($self, $c) = @_;
+ $c->response->body("Ok");
}
MyApp::Controller::Root->config(namespace=>'');
sub story :Chained(root) Args(0) {
my ($self, $c) = @_;
- Test::Most::is $self->action_for('story'), 'story/story';
- Test::Most::is $self->action_for('author/author'), 'story/author/author';
+ Test::More::is $self->action_for('story'), 'story/story';
+ Test::More::is $self->action_for('author/author'), 'story/author/author';
}
__PACKAGE__->meta->make_immutable;
sub author :Chained(root) Args(0) {
my ($self, $c, $id) = @_;
- Test::Most::is $self->action_for('author'), 'story/author/author';
- Test::Most::is $self->action_for('../story'), 'story/story';
- Test::Most::is $self->action_for('../../top'), 'top';
+ Test::More::is $self->action_for('author'), 'story/author/author';
+ Test::More::is $self->action_for('../story'), 'story/story';
+ Test::More::is $self->action_for('../../top'), 'top';
}
__PACKAGE__->meta->make_immutable;
ok request '/top';
ok request '/story';
ok request '/author';
+ok request '/double';
+ok request '/double/file.ext';
+ok request '/double/file..ext';
+
-done_testing(10);
+done_testing(13);