diff options
author | Father Chrysostomos <sprout@cpan.org> | 2014-09-09 19:22:30 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2014-09-09 19:53:23 -0700 |
commit | 32d439155644a16b717019874a8d41a0d7c2f0e0 (patch) | |
tree | 328a470260d631f0039798e4be7159762d1c87a5 /lib | |
parent | 68611e6f323ebc92c5bbf5c3a541eb88cdd29520 (diff) | |
download | perl-32d439155644a16b717019874a8d41a0d7c2f0e0.tar.gz |
Remove redundant check from overload.pm
I added this in ca6102577e. It is silly to check ref $sub a few
lines after $sub = \&....
Diffstat (limited to 'lib')
-rw-r--r-- | lib/overload.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/overload.pm b/lib/overload.pm index 51801d643d..20c011994f 100644 --- a/lib/overload.pm +++ b/lib/overload.pm @@ -81,7 +81,7 @@ sub ov_method { return undef unless $globref; my $sub = \&{*$globref}; no overloading; - return $sub if !ref $sub or $sub != \&nil; + return $sub if $sub != \&nil; return shift->can($ {*$globref}); } |