summaryrefslogtreecommitdiff
path: root/bin/bind.export
diff options
context:
space:
mode:
Diffstat (limited to 'bin/bind.export')
-rwxr-xr-xbin/bind.export7
1 files changed, 6 insertions, 1 deletions
diff --git a/bin/bind.export b/bin/bind.export
index 055782a20..943aefbb0 100755
--- a/bin/bind.export
+++ b/bin/bind.export
@@ -46,7 +46,12 @@ foreach my $export ( @exports ) {
my $zonepath = $export->option('zonepath');
$zonepath =~ s/\/$//;
- my @svc_domain = $export->svc_x;
+ #false laziness with freeside-sqlradius-reset and shell.export
+ my @svc_domain =
+ map { qsearchs('svc_domain', { 'svcnum' => $_->svcnum } ) }
+ map { qsearch('cust_svc', { 'svcpart' => $_->svcpart } ) }
+ grep { qsearch('cust_svc', { 'svcpart' => $_->svcpart } ) }
+ $export->export_svc;
foreach my $svc_domain ( @svc_domain ) {
my $domain = $svc_domain->domain;