Merge master into topic/xs-attr-template
[gitmo/Class-MOP.git] / lib / Class / MOP / Method.pm
index 857fc03..6c39cb2 100644 (file)
@@ -67,7 +67,7 @@ sub _new {
 
 ## accessors
 
-sub associated_metaclass { shift->{'associated_metaclass'} }
+#sub associated_metaclass { shift->{'associated_metaclass'} }
 
 sub attach_to_class {
     my ( $self, $class ) = @_;
@@ -85,9 +85,9 @@ sub fully_qualified_name {
     $self->package_name . '::' . $self->name;
 }
 
-sub original_method { (shift)->{'original_method'} }
+#sub original_method { (shift)->{'original_method'} }
 
-sub _set_original_method { $_[0]->{'original_method'} = $_[1] }
+#sub _set_original_method { $_[0]->{'original_method'} = $_[1] }
 
 # It's possible that this could cause a loop if there is a circular
 # reference in here. That shouldn't ever happen in normal