summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/TAP/Parser/Result.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/TAP/Parser/Result.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/TAP/Parser/Result.pm13
1 files changed, 5 insertions, 8 deletions
diff --git a/Master/tlpkg/tlperl/lib/TAP/Parser/Result.pm b/Master/tlpkg/tlperl/lib/TAP/Parser/Result.pm
index a0caebe24ca..eaad1d2f41b 100644
--- a/Master/tlpkg/tlperl/lib/TAP/Parser/Result.pm
+++ b/Master/tlpkg/tlperl/lib/TAP/Parser/Result.pm
@@ -1,11 +1,9 @@
package TAP::Parser::Result;
use strict;
-use vars qw($VERSION @ISA);
+use warnings;
-use TAP::Object ();
-
-@ISA = 'TAP::Object';
+use base 'TAP::Object';
BEGIN {
@@ -26,11 +24,11 @@ TAP::Parser::Result - Base class for TAP::Parser output objects
=head1 VERSION
-Version 3.26
+Version 3.30
=cut
-$VERSION = '3.26';
+our $VERSION = '3.30';
=head1 SYNOPSIS
@@ -274,9 +272,8 @@ subclass L<TAP::Parser::Grammar> too, or else it'll never get used.
package MyResult;
use strict;
- use vars '@ISA';
- @ISA = 'TAP::Parser::Result';
+ use base 'TAP::Parser::Result';
# register with the factory:
TAP::Parser::ResultFactory->register_type( 'my_type' => __PACKAGE__ );