X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Frelative_root_action_for_bug.t;h=8db0f1f0517f57d5a74c040f771c83d2f4261910;hp=94430526961b372380a5913a7eee60923c1c68a2;hb=6e3dd95f237370a2824e5ecc1419eaed075f0279;hpb=518b61984c49533ec00813125b16812cd681e778 diff --git a/t/relative_root_action_for_bug.t b/t/relative_root_action_for_bug.t index 9443052..8db0f1f 100644 --- a/t/relative_root_action_for_bug.t +++ b/t/relative_root_action_for_bug.t @@ -17,11 +17,6 @@ use Test::Most; my ($self, $c) = @_; Test::Most::is $self->action_for('top'), 'top'; Test::Most::is $self->action_for('story/story'), 'story/story'; - - #warn ref($c)->dispatcher->get_action('story/story', '/root'); - - #use Devel::Dwarn; - #Dwarn ref($c)->dispatcher->_action_hash->{'story/story'}; } MyApp::Controller::Root->config(namespace=>''); @@ -62,9 +57,10 @@ use Test::Most; 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'; } - __PACKAGE__->meta->make_immutable; package MyApp; @@ -77,9 +73,9 @@ use Test::Most; use Catalyst::Test 'MyApp'; +ok request '/top'; ok request '/story'; ok request '/author'; -ok request '/top'; -done_testing(8); +done_testing(10);