Creanup
[gitmo/Mouse.git] / lib / Mouse / Meta / Class.pm
index 7d7d1a0..6b75adf 100644 (file)
@@ -63,14 +63,7 @@ sub _construct_class_instance {
     bless \%args, $class;
 }
 
-sub name { $_[0]->{package} }
-sub _method_map{ $_[0]->{methods} }
-
-sub namespace{
-    my $name = $_[0]->{package};
-    no strict 'refs';
-    return \%{ $name . '::' };
-}
+sub roles { $_[0]->{roles} }
 
 sub superclasses {
     my $self = shift;
@@ -276,9 +269,6 @@ sub add_override_method_modifier {
     *$method = sub { $code->($pkg, $body, @_) };
 }
 
-
-sub roles { $_[0]->{roles} }
-
 sub does_role {
     my ($self, $role_name) = @_;