From 3d3a0a8a5e7ee9abf3f3e52e1b63942b8c55a069 Mon Sep 17 00:00:00 2001 From: Nicolas R Date: Tue, 12 Sep 2017 13:20:25 -0600 Subject: Replace multiple 'use vars' by 'our' in utils Using vars pragma is discouraged and has been superseded by 'our' declarations available in Perl v5.6.0 or later. --- Porting/Maintainers.pm | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) (limited to 'Porting/Maintainers.pm') diff --git a/Porting/Maintainers.pm b/Porting/Maintainers.pm index 1c52829f32..20ed4f7055 100644 --- a/Porting/Maintainers.pm +++ b/Porting/Maintainers.pm @@ -13,16 +13,15 @@ use lib "Porting"; use 5.008; require "Maintainers.pl"; -use vars qw(%Modules %Maintainers); +our (%Modules, %Maintainers); -use vars qw(@ISA @EXPORT_OK $VERSION); -@ISA = qw(Exporter); -@EXPORT_OK = qw(%Modules %Maintainers +our @ISA = qw(Exporter); +our @EXPORT_OK = qw(%Modules %Maintainers get_module_files get_module_pat show_results process_options files_to_modules finish_tap_output reload_manifest); -$VERSION = 0.12; +our $VERSION = 0.13; require Exporter; -- cgit v1.2.1