tests are passing
[catagits/CatalystX-Routes.git] / t / lib / MyApp1 / Controller / C1.pm
1 package MyApp1::Controller::C1;
2
3 use Moose;
4 use CatalystX::Routes;
5
6 BEGIN { extends 'Catalyst::Controller' }
7
8 our %REQ;
9
10 sub _get      { $REQ{get}++ }
11 sub _get_html { $REQ{get_html}++ }
12 sub _post     { $REQ{post}++ }
13 sub _put      { $REQ{put}++ }
14 sub _del      { $REQ{delete}++ }
15
16 get '/foo' => \&_get;
17
18 get_html '/foo' => \&_get_html;
19
20 post '/foo' => \&_post;
21
22 put '/foo' => \&_put;
23
24 del '/foo' => \&_del;
25
26 sub normal : Chained('/') : Args(0) {
27     $REQ{normal}++;
28 }
29
30 1;