From 4be96a21fb9f2d8955868df9670ccad6b760451b Mon Sep 17 00:00:00 2001
From: Jamie Cameron <jcameron@webmin.com>
Date: Fri, 1 Jul 2016 03:40:06 -0700
Subject: [PATCH] Use correct variable for domain name
 https://github.com/virtualmin/virtualmin-mailrelay/issues/1

---
 virtual_feature.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/virtual_feature.pl b/virtual_feature.pl
index 23fe1a5..1387a98 100755
--- 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'});