From 5e7043884b8f139c2780ecfaf1d9673938a64c0d Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Mon, 10 Oct 2011 12:29:34 -0500
Subject: if service => 0 is specified, don't do the attribute trait at all

---
 lib/Bread/Board/Declare/Meta/Role/Attribute.pm | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'lib/Bread/Board/Declare/Meta/Role/Attribute.pm')

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
-- 
cgit v1.2.3-54-g00ecf