diff options
author | Ricardo Signes <rjbs@cpan.org> | 2013-09-08 22:07:03 -0400 |
---|---|---|
committer | Ricardo Signes <rjbs@cpan.org> | 2013-09-12 19:49:17 -0400 |
commit | 383fb793a0f7fe50989c774b9b0face16ff871d5 (patch) | |
tree | 96c47aab70787cbc7f5872ee81a70aae3760ee2d /lib/overload.t | |
parent | af23c90265b8ad580b6654ead9343c0071c3e9eb (diff) | |
download | perl-383fb793a0f7fe50989c774b9b0face16ff871d5.tar.gz |
overload tests: use parent instead of base
Diffstat (limited to 'lib/overload.t')
-rw-r--r-- | lib/overload.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/overload.t b/lib/overload.t index 3af969bc69..c83c0ed3a8 100644 --- a/lib/overload.t +++ b/lib/overload.t @@ -2065,11 +2065,11 @@ fresh_perl_is } package NCmp; - use base 'CmpBase'; + use parent '-norequire', 'CmpBase'; use overload '<=>' => 'cmp'; package SCmp; - use base 'CmpBase'; + use parent '-norequire', 'CmpBase'; use overload 'cmp' => 'cmp'; package main; @@ -2133,7 +2133,7 @@ fresh_perl_is ? $nomethod . "=>'nomethod'," : ''; eval qq{ package NuMB$fall$nomethod; - use base qw/NuMB/; + use parent '-norequire', qw/NuMB/; use overload $nomethod_decl fallback => $fall; }; |