From ef7e50ac283e90f9a1de96c6e3e65f636018cace Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Mon, 21 Feb 2011 16:21:11 -0600 Subject: stub out docs --- lib/Bread/Board/Declare/Meta/Role/Attribute.pm | 33 ++++++++++++++++++++++++++ lib/Bread/Board/Declare/Meta/Role/Class.pm | 9 +++++++ 2 files changed, 42 insertions(+) (limited to 'lib/Bread/Board/Declare/Meta') diff --git a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm index 5cd4434..82d90db 100644 --- a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm +++ b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm @@ -1,6 +1,7 @@ package Bread::Board::Declare::Meta::Role::Attribute; use Moose::Role; Moose::Util::meta_attribute_alias('Service'); +# ABSTRACT: attribute metarole for Bread::Board::Declare use Bread::Board::Types; use List::MoreUtils qw(any); @@ -9,18 +10,34 @@ use Bread::Board::Declare::BlockInjection; use Bread::Board::Declare::ConstructorInjection; use Bread::Board::Declare::Literal; +=head1 DESCRIPTION + +=cut + +=attr service + +=cut + has service => ( is => 'ro', isa => 'Bool', default => 1, ); +=attr block + +=cut + has block => ( is => 'ro', isa => 'CodeRef', predicate => 'has_block', ); +=attr literal_value + +=cut + # has_value is already a method has literal_value => ( is => 'ro', @@ -29,12 +46,20 @@ has literal_value => ( predicate => 'has_literal_value', ); +=attr lifecycle + +=cut + has lifecycle => ( is => 'ro', isa => 'Str', predicate => 'has_lifecycle', ); +=attr dependencies + +=cut + has dependencies => ( is => 'ro', isa => 'Bread::Board::Service::Dependencies', @@ -42,12 +67,20 @@ has dependencies => ( predicate => 'has_dependencies', ); +=attr constructor_name + +=cut + has constructor_name => ( is => 'ro', isa => 'Str', predicate => 'has_constructor_name', ); +=attr associated_service + +=cut + has associated_service => ( is => 'rw', isa => 'Bread::Board::Service', diff --git a/lib/Bread/Board/Declare/Meta/Role/Class.pm b/lib/Bread/Board/Declare/Meta/Role/Class.pm index 2869f7e..57a9db9 100644 --- a/lib/Bread/Board/Declare/Meta/Role/Class.pm +++ b/lib/Bread/Board/Declare/Meta/Role/Class.pm @@ -1,9 +1,18 @@ package Bread::Board::Declare::Meta::Role::Class; use Moose::Role; +# ABSTRACT: class metarole for Bread::Board::Declare use Bread::Board::Service; use List::MoreUtils qw(any); +=head1 DESCRIPTION + +=cut + +=method get_all_services + +=cut + sub get_all_services { my $self = shift; return map { $_->associated_service } -- cgit v1.2.3-54-g00ecf