Fix some bizarro code left behind by a much earlier change.
Dave Rolsky [Tue, 4 Nov 2008 17:30:08 +0000 (17:30 +0000)]
lib/Class/MOP/Attribute.pm

index a433bec..174b04f 100644 (file)
@@ -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 {