From 2d95b92582166f711e05c973f3e22950bbce6b2f Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Wed, 27 Jul 2011 11:03:04 -0500 Subject: allow specifying parameters for services (not sure how i missed this) --- lib/Bread/Board/Declare/Meta/Role/Attribute.pm | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) (limited to 'lib') diff --git a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm index aa988ff..0fddfca 100644 --- a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm +++ b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm @@ -83,6 +83,19 @@ has dependencies => ( predicate => 'has_dependencies', ); +=attr parameters + +The parameter specification to use when creating the service. See L. + +=cut + +has parameters => ( + is => 'ro', + isa => 'Bread::Board::Service::Parameters', + coerce => 1, + predicate => 'has_parameters', +); + =attr infer If true, the dependency list will be inferred as much as possible from the @@ -136,6 +149,9 @@ after attach_to_class => sub { ($self->has_dependencies ? (dependencies => $self->dependencies) : ()), + ($self->has_parameters + ? (parameters => $self->parameters) + : ()), ($self->has_constructor_name ? (constructor_name => $self->constructor_name) : ()), -- cgit v1.2.3