Commit | Line | Data |
642eba83 |
1 | package Catalyst::IOC::Service::WithParameters; |
2 | use Moose::Role; |
3 | |
8f5f2108 |
4 | with 'Bread::Board::Service::WithParameters' => { excludes => '_build_parameters' }; |
642eba83 |
5 | |
3c628ac6 |
6 | # FIXME - shouldn't this be merged with WithAcceptContext? |
7 | |
642eba83 |
8 | sub _build_parameters { |
9fa9a182 |
9 | { |
10 | ctx => { |
11 | required => 1, |
12 | }, |
642eba83 |
13 | accept_context_args => { |
8f5f2108 |
14 | isa => 'ArrayRef', |
9084f394 |
15 | default => sub { [] }, |
642eba83 |
16 | } |
17 | }; |
18 | } |
19 | |
20 | no Moose::Role; |
21 | 1; |
22 | |
23 | __END__ |
24 | |
25 | =pod |
26 | |
27 | =head1 NAME |
28 | |
29 | Catalyst::IOC::Service::WithParameters |
30 | |
31 | =head1 DESCRIPTION |
32 | |
33 | =head1 METHODS |
34 | |
35 | =head1 AUTHORS |
36 | |
37 | Catalyst Contributors, see Catalyst.pm |
38 | |
39 | =head1 COPYRIGHT |
40 | |
41 | This library is free software. You can redistribute it and/or modify it under |
42 | the same terms as Perl itself. |
43 | |
44 | =cut |