From 3d3a0a8a5e7ee9abf3f3e52e1b63942b8c55a069 Mon Sep 17 00:00:00 2001
From: Nicolas R <atoomic@cpan.org>
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.
---
 installperl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'installperl')

diff --git a/installperl b/installperl
index af61203e72..3bf79d2d6f 100755
--- a/installperl
+++ b/installperl
@@ -11,8 +11,8 @@ BEGIN {
 }
 
 use strict;
-use vars qw($Is_VMS $Is_W32 $Is_OS2 $Is_Cygwin $Is_Darwin $Is_NetWare $Is_AmigaOS
-	    %opts $packlist);
+our ($Is_VMS, $Is_W32, $Is_OS2, $Is_Cygwin, $Is_Darwin, $Is_NetWare, $Is_AmigaOS,
+	    %opts, $packlist);
 my $versiononly;
 
 BEGIN {
-- 
cgit v1.2.1