added default {} keyword
Stevan Little [Wed, 16 Aug 2006 19:53:00 +0000 (19:53 +0000)]
lib/Moose.pm

index d7d4dbb..708d73b 100644 (file)
@@ -145,12 +145,6 @@ use Moose::Util::TypeConstraints;
         blessed => sub {
             return \&Scalar::Util::blessed;
         },
-        default => sub {
-            return subname 'Moose::default' => sub (&) {
-                my $block = shift;
-                return ('default' => $block);
-            };
-        }
     );
 
     my $exporter = Sub::Exporter::build_exporter({