fix #1548: replace perl use vars with our

[pve-common.git] / src / PVE / AtomicFile.pm

diff --git a/src/PVE/AtomicFile.pm b/src/PVE/AtomicFile.pm
index b1889e82fbc844d29e4a2355bba04b6e11d5b769..2086c7ac9e13e90adc3b539f4cc30390fc48ab7d 100644 (file)
--- a/src/PVE/AtomicFile.pm
+++ b/src/PVE/AtomicFile.pm
@@ -3,9 +3,8 @@ package PVE::AtomicFile;
 use strict;
 use warnings;
 use IO::AtomicFile;
-use vars qw(@ISA);
 
-@ISA = qw(IO::AtomicFile);
+our @ISA = qw(IO::AtomicFile);
 
 sub new {
     my $class = shift;