Tidy
[gitmo/Mouse.git] / lib / Mouse / Meta / Method.pm
index 7fb56bd..68b1a8f 100755 (executable)
@@ -28,7 +28,7 @@ sub package_name         { $_[0]->{package} }
 sub associated_metaclass { $_[0]->{associated_metaclass} }
 
 sub fully_qualified_name {
-    my $self = shift;
+    my($self) = @_;
     return $self->package_name . '::' . $self->name;
 }