X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FMethod.pm;h=68b1a8f4f1e049175876fb3ba1cdacbaefbb983d;hp=7fb56bdc0cc5fa48cde7e65eb0ab5892995f5813;hb=cf59b7151d2b476a74b5abd84af37770ad4cf387;hpb=506fb74dbff3e8f756230c643d8bff7b85ae9ca3 diff --git a/lib/Mouse/Meta/Method.pm b/lib/Mouse/Meta/Method.pm index 7fb56bd..68b1a8f 100755 --- a/lib/Mouse/Meta/Method.pm +++ b/lib/Mouse/Meta/Method.pm @@ -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; }