X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FMixin%2FHasMethods.pm;h=8e38d5ed3923c59f67678e3761ee648b091aa91a;hb=736bf1f0c52b34a9a91374d3f090d04d1c311440;hp=cd11a8fb3e5cf966be712a684a38bff065b3f4d9;hpb=8deee66e55238b0c01ed6f687dabe53b1931b087;p=gitmo%2FClass-MOP.git diff --git a/lib/Class/MOP/Mixin/HasMethods.pm b/lib/Class/MOP/Mixin/HasMethods.pm index cd11a8f..8e38d5e 100644 --- a/lib/Class/MOP/Mixin/HasMethods.pm +++ b/lib/Class/MOP/Mixin/HasMethods.pm @@ -108,10 +108,10 @@ sub get_method { } ); - # This seems to happen in some weird cases where methods modifiers are - # added via roles or some other such bizareness. Honestly, I don't totally - # understand this, but returning the entry works, and keeps various MX - # modules from blowing up. - DR + # The !$code case seems to happen in some weird cases where methods + # modifiers are added via roles or some other such bizareness. Honestly, I + # don't totally understand this, but returning the entry works, and keeps + # various MX modules from blowing up. - DR return $map_entry if blessed $map_entry && ( !$code || $map_entry->body == $code );