michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-05-04 14:20:31 +01:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

strict/warn, remove $view from can_edit_zone call

Browse Source
This commit is contained in:
Joe Cooper
2016-06-02 00:59:53 -07:00
parent eaba21745a
commit ed265ce71f
1 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
bind8/refetch.cgi
View File

@@ -1,21 +1,24 @@
#!/usr/local/bin/perl
# Re-download the root zone servers
use strict;
use warnings;
our (%text, %in);
require './bind8-lib.pl';
&error_setup($text{'refetch_err'});
&ReadParse();
# Work out the filename
$zone = &get_zone_name_or_error($in{'zone'}, $in{'view'});
&can_edit_zone($zone, $view) ||
my $zone = &get_zone_name_or_error($in{'zone'}, $in{'view'});
&can_edit_zone($zone) ||
&error($text{'hint_ecannot'});
$file = $zone->{'file'};
$rootfile = &make_chroot(&absolute_path($file));
my $file = $zone->{'file'};
my $rootfile = &make_chroot(&absolute_path($file));
# Try to download the root servers file from
# ftp://rs.internic.net/domain/named.root
&lock_file($rootfile);
$err = &download_root_zone(&absolute_path($file));
my $err = &download_root_zone(&absolute_path($file));
&error($err) if ($err);
&unlock_file($rootfile);