diff --git a/bind8/edit_master.cgi b/bind8/edit_master.cgi
index c245b8eb5..ba7d4725f 100755
--- a/bind8/edit_master.cgi
+++ b/bind8/edit_master.cgi
@@ -4,6 +4,7 @@
 
 require './bind8-lib.pl';
 &ReadParse();
+our $ipv6revzone;
 $in{'view'} = 'any' if ($in{'view'} eq '');
 $zone = &get_zone_name_or_error($in{'zone'}, $in{'view'});
 $dom = $zone->{'name'};
diff --git a/bind8/edit_slave.cgi b/bind8/edit_slave.cgi
index 228e07f2b..81e9aabc0 100755
--- a/bind8/edit_slave.cgi
+++ b/bind8/edit_slave.cgi
@@ -4,6 +4,7 @@
 
 require './bind8-lib.pl';
 &ReadParse();
+our $ipv6revzone;
 
 $in{'view'} = 'any' if ($in{'view'} eq '');
 $zone = &get_zone_name_or_error($in{'zone'}, $in{'view'});
diff --git a/bind8/records-lib.pl b/bind8/records-lib.pl
index 385a93d30..5ead956d1 100755
--- a/bind8/records-lib.pl
+++ b/bind8/records-lib.pl
@@ -6,6 +6,7 @@ use warnings;
 our (%config, %text, %in);
 our $module_config_directory;
 our $bind_version;
+our $ipv6revzone = $config{'ipv6_mode'} ? "ip6.arpa" : "ip6.int";
 
 # read_zone_file(file, origin, [previous], [only-soa], [no-chroot])
 # Reads a DNS zone file and returns a data structure of records. The origin
@@ -601,8 +602,6 @@ if ($_[0] =~ /^([\d\-\.\/]+)$/) {
 return $_[0];
 }
 
-my $ipv6revzone = $config{'ipv6_mode'} ? "ip6.arpa" : "ip6.int";
-
 # ip6int_to_net(name)
 # Converts an address like a.b.c.d.4.3.2.1.ip6.int. to 1234:dcba::
 sub ip6int_to_net
diff --git a/bind8/save_record.cgi b/bind8/save_record.cgi
index a215df1bc..19e79054a 100755
--- a/bind8/save_record.cgi
+++ b/bind8/save_record.cgi
@@ -3,6 +3,7 @@
 # Adds or updates a record of some type
 
 require './bind8-lib.pl';
+our $ipv6revzone;
 &ReadParse();
 &error_setup($text{'edit_err'});
 $zone = &get_zone_name_or_error($in{'zone'}, $in{'view'});