From: Dave Rolsky <autarch@urth.org>
Date: Tue, 4 Nov 2008 17:30:08 +0000 (+0000)
Subject: Fix some bizarro code left behind by a much earlier change.
X-Git-Tag: 0.69~5
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f90480aa9c826593530881129f91b47e84e1415b;p=gitmo%2FClass-MOP.git

Fix some bizarro code left behind by a much earlier change.
---

diff --git a/lib/Class/MOP/Attribute.pm b/lib/Class/MOP/Attribute.pm
index a433bec..174b04f 100644
--- a/lib/Class/MOP/Attribute.pm
+++ b/lib/Class/MOP/Attribute.pm
@@ -241,7 +241,7 @@ sub get_write_method_ref {
 }
 
 sub is_default_a_coderef {
-    ('CODE' eq ref($_[0]->{'default'} || $_[0]->{default}))
+    ('CODE' eq ref($_[0]->{'default'}))
 }
 
 sub default {