diff options
Diffstat (limited to 'lib/Bread/Board/Declare/Meta/Role/Attribute.pm')
-rw-r--r-- | lib/Bread/Board/Declare/Meta/Role/Attribute.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm index 2caeed4..c7d1477 100644 --- a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm +++ b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm @@ -15,6 +15,11 @@ around interpolate_class => sub { return $class->$orig(@_) if $options->{metaclass}; + if (exists $options->{service} && !$options->{service}) { + delete $options->{service}; + return $class->$orig(@_); + } + my ($new_class, @traits) = $class->$orig(@_); return wantarray ? ($new_class, @traits) : $new_class |