package Monkey::Patch::Handle::Object;
BEGIN {
$Monkey::Patch::Handle::Object::VERSION = '0.03';
}
use strict;
use warnings;
use base 'Monkey::Patch::Handle::Class';
sub should_call_code {
my ($self, $invocant) = @_;
no warnings 'numeric';
return $self->{object} == $invocant;
}
1;
=pod
=begin Pod::Coverage
.*
=end Pod::Coverage