use Scalar::Util qw(blessed);
use Exporter 5.57 qw(import);
-our $VERSION = '1.000005';
+our $VERSION = '1.000006';
our @EXPORT = qw($_call_if_object $_isa $_can $_does $_DOES);
# we gratuitously break modules like Scalar::Defer, which would be
# un-perlish.
return unless blessed($obj);
+ return $obj->isa(@_) if lc($method) eq 'does' and not $obj->can($method);
return $obj->$method(@_);
};