From: Karen Etheridge <ether@cpan.org>
Date: Thu, 7 Apr 2011 16:32:31 +0000 (-0700)
Subject: don't attempt to wrap a method from MooseX::ClassAttribute if the consuming class... 
X-Git-Tag: v0.17~6
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=418d177d4f460b579609d31d2ae1246bf7093c38;p=gitmo%2FMooseX-AlwaysCoerce.git

don't attempt to wrap a method from MooseX::ClassAttribute if the consuming class isn't applying that trait.
---

diff --git a/lib/MooseX/AlwaysCoerce.pm b/lib/MooseX/AlwaysCoerce.pm
index ff7b2c6..8cb3831 100644
--- a/lib/MooseX/AlwaysCoerce.pm
+++ b/lib/MooseX/AlwaysCoerce.pm
@@ -71,6 +71,9 @@ Use C<< coerce => 0 >> to disable a coercion explicitly.
     use Moose::Role;
     use Moose::Util::TypeConstraints;
 
+    # MooseX::ClassAttribute is not always present in the consuming class
+    sub add_class_attribute { }
+
     around add_class_attribute => sub {
         my $next = shift;
         my $self = shift;