Commit | Line | Data |
12b853ff |
1 | use CatalystX::Declare; |
2 | namespace TestApp; |
3 | role ::ActionRole::hasActionParams_AppNS { |
4 | has [qw/p1 p2/] => (is=>'ro', lazy_build=>1); |
5 | method _build_p1 { |
6 | join ',', @{$self->attributes->{p1}}; |
7 | } |
8 | method _build_p2 { |
9 | join ',', @{$self->attributes->{p2}}; |
10 | } |
11 | } |
12 | |