diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/TAP/Base.pm')
-rw-r--r-- | Master/tlpkg/tlperl/lib/TAP/Base.pm | 15 |
1 files changed, 5 insertions, 10 deletions
diff --git a/Master/tlpkg/tlperl/lib/TAP/Base.pm b/Master/tlpkg/tlperl/lib/TAP/Base.pm index ff8da427c8b..02f8b5e48ce 100644 --- a/Master/tlpkg/tlperl/lib/TAP/Base.pm +++ b/Master/tlpkg/tlperl/lib/TAP/Base.pm @@ -1,11 +1,9 @@ package TAP::Base; use strict; -use vars qw($VERSION @ISA); +use warnings; -use TAP::Object; - -@ISA = qw(TAP::Object); +use base 'TAP::Object'; =head1 NAME @@ -14,11 +12,11 @@ and L<TAP::Harness> =head1 VERSION -Version 3.26 +Version 3.30 =cut -$VERSION = '3.26'; +our $VERSION = '3.30'; use constant GOT_TIME_HIRES => do { eval 'use Time::HiRes qw(time);'; @@ -29,10 +27,7 @@ use constant GOT_TIME_HIRES => do { package TAP::Whatever; - use TAP::Base; - - use vars qw($VERSION @ISA); - @ISA = qw(TAP::Base); + use base 'TAP::Base'; # ... later ... |