diff options
author | Jesse Luehrs <doy@tozt.net> | 2011-10-03 19:01:44 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2011-10-03 19:01:44 -0500 |
commit | 5c235d524709938d131823e4c17fac45027dd463 (patch) | |
tree | 6ca5acb9d69111c9741e19cda79ceb66ae3d6c7f /lib/Bread/Board/Declare | |
parent | 6c0a0188bd28d2bb43dfcf797a4e04bdbc84b0e9 (diff) | |
download | bread-board-declare-5c235d524709938d131823e4c17fac45027dd463.tar.gz bread-board-declare-5c235d524709938d131823e4c17fac45027dd463.zip |
...but the class still has to exist
Diffstat (limited to 'lib/Bread/Board/Declare')
-rw-r--r-- | lib/Bread/Board/Declare/Role/Object.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Bread/Board/Declare/Role/Object.pm b/lib/Bread/Board/Declare/Role/Object.pm index 1409d34..fe0c651 100644 --- a/lib/Bread/Board/Declare/Role/Object.pm +++ b/lib/Bread/Board/Declare/Role/Object.pm @@ -16,7 +16,7 @@ after BUILD => sub { my %seen = ( map { $_->class => $_->name } - grep { $_->does('Bread::Board::Service::WithClass') } + grep { $_->does('Bread::Board::Service::WithClass') && $_->has_class } $meta->get_all_services ); for my $service ($meta->get_all_services) { |