Changed ActionRole to ActionClass
Matthias Dietrich [Wed, 19 Oct 2011 17:01:43 +0000 (19:01 +0200)]
t/lib/TestApp/Action/TestMatchCaptures.pm [moved from t/lib/TestApp/ActionRole/TestMatchCaptures.pm with 76% similarity]
t/lib/TestApp/Controller/Action/Chained.pm

similarity index 76%
rename from t/lib/TestApp/ActionRole/TestMatchCaptures.pm
rename to t/lib/TestApp/Action/TestMatchCaptures.pm
index 3695ffe..2d9d167 100644 (file)
@@ -1,7 +1,8 @@
-package TestApp::ActionRole::TestMatchCaptures;
+package TestApp::Action::TestMatchCaptures;
 
-use Moose::Role;
-use namespace::autoclean;
+use Moose;
+
+extends 'Catalyst::Action';
 
 sub match_captures {
     my ($self, $c, $cap) = @_;
index cffd3d6..732a35b 100644 (file)
@@ -5,7 +5,7 @@ use warnings;
 
 use HTML::Entities;
 
-use base qw/Catalyst::Controller::ActionRole/;
+use base qw/Catalyst::Controller/;
 
 sub begin :Private { }
 
@@ -220,7 +220,7 @@ sub roundtrip_urifor_end : Chained('roundtrip_urifor') PathPart('') Args(1) {
     $c->stash->{no_end} = 1;
 }
 
-sub match_captures : Chained('/') PathPart('chained/match_captures') CaptureArgs(1) Does('~TestMatchCaptures') {
+sub match_captures : Chained('/') PathPart('chained/match_captures') CaptureArgs(1) ActionClass('+TestApp::Action::TestMatchCaptures') {
     my ($self, $c) = @_;
     $c->res->header( 'X-TestAppActionTestMatchCapturesHasRan', 'yes');
 }