Attribute-Handlers: Swap out base for parent in test files.

Committer's note: Add dist/Attribute-Handlers/demo/MyClass.pm to list of
files whose $VERSION numbers do not have to be incremented when modified.
Since this file is found in a 'demo/' directory, it does not have to be
treated as if it were a real Perl library which happens to be shipping
with core.

For: RT #119365

2 files changed, 2 insertions, 2 deletions

diff --git a/dist/Attribute-Handlers/demo/MyClass.pm b/dist/Attribute-Handlers/demo/MyClass.pm
index d012b9f1c4..79175369f6 100644
--- a/dist/Attribute-Handlers/demo/MyClass.pm
+++ b/dist/Attribute-Handlers/demo/MyClass.pm
@@ -1,7 +1,7 @@
 package MyClass;
 $VERSION = '1.00';
 use 5.006;
-use base Attribute::Handlers;
+use parent qw(Attribute::Handlers);
 no warnings 'redefine';
 
 
diff --git a/dist/Attribute-Handlers/t/multi.t b/dist/Attribute-Handlers/t/multi.t
index 5c80f82b10..34ff940ae2 100644
--- a/dist/Attribute-Handlers/t/multi.t
+++ b/dist/Attribute-Handlers/t/multi.t
@@ -92,7 +92,7 @@ my %z :Aokay(1,19);
 sub z :Aokay(1,20) {};
 
 package DerTest;
-use base 'Test';
+use parent qw(Test);
 use warnings;
 
 my $x5 :Dokay(1,21);