From 53617281749f123de4da146e810fd892c1a28dd3 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Wed, 25 May 2011 19:36:49 -0500 Subject: ensure classes corresponding to class types are loaded otherwise, type inference doesn't work --- lib/Bread/Board/Declare/Meta/Role/Attribute.pm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lib/Bread/Board/Declare') diff --git a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm index 1eabba1..000abef 100644 --- a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm +++ b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm @@ -147,6 +147,7 @@ after attach_to_class => sub { if ($self->has_block) { if ($tc && $tc->isa('Moose::Meta::TypeConstraint::Class')) { %params = (%params, class => $tc->class); + Class::MOP::load_class($tc->class); } $service = Bread::Board::Declare::BlockInjection->new( %params, @@ -160,6 +161,7 @@ after attach_to_class => sub { ); } elsif ($tc && $tc->isa('Moose::Meta::TypeConstraint::Class')) { + Class::MOP::load_class($tc->class); $service = Bread::Board::Declare::ConstructorInjection->new( %params, class => $tc->class, -- cgit v1.2.3