mirror of
https://github.com/webmin/webmin.git
synced 2026-05-04 22:30:33 +01:00
strict/warn
This commit is contained in:
@@ -1,17 +1,20 @@
|
||||
#!/usr/local/bin/perl
|
||||
# Sign a master zone
|
||||
use strict;
|
||||
use warnings;
|
||||
our (%access, %text, %in);
|
||||
|
||||
require './bind8-lib.pl';
|
||||
&error_setup($text{'sign_err'});
|
||||
&ReadParse();
|
||||
$zone = &get_zone_name_or_error($in{'zone'}, $in{'view'});
|
||||
$dom = $zone->{'name'};
|
||||
my $zone = &get_zone_name_or_error($in{'zone'}, $in{'view'});
|
||||
my $dom = $zone->{'name'};
|
||||
&can_edit_zone($zone) ||
|
||||
&error($text{'master_ecannot'});
|
||||
|
||||
# Do the signing
|
||||
&lock_file(&make_chroot(&absolute_path($zone->{'file'})));
|
||||
$err = &sign_dnssec_zone($zone, 1);
|
||||
my $err = &sign_dnssec_zone($zone, 1);
|
||||
&error($err) if ($err);
|
||||
&unlock_file(&make_chroot(&absolute_path($zone->{'file'})));
|
||||
$err = &restart_zone($zone->{'name'}, $zone->{'view'});
|
||||
|
||||
Reference in New Issue
Block a user