Use correct variable for domain name #1

virtualmin · Jul 1, 2016 · 4be96a2 · 4be96a2
1 parent 0a57870
commit 4be96a2
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/virtual_feature.pl b/virtual_feature.pl
@@ -348,11 +348,11 @@ sub feature_delete
 	my $file = &bind8::find("file", $z->{'members'});
 	my $fn = $file->{'values'}->[0];
 	my $zonefile = &bind8::make_chroot($fn);
-	my @recs = &bind8::read_zone_file($fn, $newzonename);
+	my @recs = &bind8::read_zone_file($fn, $d->{'dom'});
 	my @mx = grep { $_->{'type'} eq 'MX' &&
-			   $_->{'name'} eq $_[0]->{'dom'}."." ||
+			   $_->{'name'} eq $d->{'dom'}."." ||
 			   $_->{'type'} eq 'A' &&
-			   $_->{'name'} eq "mail.".$_[0]->{'dom'}."." } @recs;
+			   $_->{'name'} eq "mail.".$d->{'dom'}."." } @recs;
 	if (@mx) {
 		&$virtual_server::first_print(
 			$virtual_server::text{'save_dns5'});