X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FHTTPMethods.pm;h=5d428581d6962d2127534a3e13319d83d61f3cd3;hb=130b45ec858db6863e3d6959f7a6e3b6908cd48e;hp=2f7476dd6ad98404d8899bad16d292aa4229c530;hpb=0c246eea6a68c8c34b267148b6de4435eda36b0f;p=catagits%2FCatalyst-Runtime.git diff --git a/t/lib/TestApp/Controller/HTTPMethods.pm b/t/lib/TestApp/Controller/HTTPMethods.pm index 2f7476d..5d42858 100644 --- a/t/lib/TestApp/Controller/HTTPMethods.pm +++ b/t/lib/TestApp/Controller/HTTPMethods.pm @@ -80,6 +80,10 @@ sub delete2 :Chained('post_or_delete') PathPart('') Args(0) DELETE { sub check_default :Chained('base') CaptureArgs(0) { } +sub chain_default :Chained('check_default') PathPart('') Args(0) { + pop->res->body('chain_default'); +} + sub default_get :Chained('check_default') PathPart('') Args(0) GET { pop->res->body('get3'); } @@ -88,8 +92,6 @@ sub default_post :Chained('check_default') PathPart('') Args(0) POST { pop->res->body('post3'); } -sub chain_default :Chained('check_default') PathPart('') Args(0) { - pop->res->body('chain_default'); -} + __PACKAGE__->meta->make_immutable;