summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/TAP/Parser/IteratorFactory.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/TAP/Parser/IteratorFactory.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/TAP/Parser/IteratorFactory.pm15
1 files changed, 5 insertions, 10 deletions
diff --git a/Master/tlpkg/tlperl/lib/TAP/Parser/IteratorFactory.pm b/Master/tlpkg/tlperl/lib/TAP/Parser/IteratorFactory.pm
index cda251e8d72..8b75724fd8e 100644
--- a/Master/tlpkg/tlperl/lib/TAP/Parser/IteratorFactory.pm
+++ b/Master/tlpkg/tlperl/lib/TAP/Parser/IteratorFactory.pm
@@ -1,14 +1,12 @@
package TAP::Parser::IteratorFactory;
use strict;
-use vars qw($VERSION @ISA);
-
-use TAP::Object ();
+use warnings;
use Carp qw( confess );
use File::Basename qw( fileparse );
-@ISA = qw(TAP::Object);
+use base 'TAP::Object';
use constant handlers => [];
@@ -18,11 +16,11 @@ TAP::Parser::IteratorFactory - Figures out which SourceHandler objects to use fo
=head1 VERSION
-Version 3.26
+Version 3.30
=cut
-$VERSION = '3.26';
+our $VERSION = '3.30';
=head1 SYNOPSIS
@@ -302,11 +300,8 @@ But in case you find the need to...
package MyIteratorFactory;
use strict;
- use vars '@ISA';
-
- use TAP::Parser::IteratorFactory;
- @ISA = qw( TAP::Parser::IteratorFactory );
+ use base 'TAP::Parser::IteratorFactory';
# override source detection algorithm
sub detect_source {