From: Ivan Kohler <ivan@freeside.biz>
Date: Fri, 28 Apr 2017 15:25:50 +0000 (-0700)
Subject: don't error out with a vitely export disconnected from any services, RT#75736
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=512dd310b4095d5163913acaeb9a6df34d882f6f

don't error out with a vitely export disconnected from any services, RT#75736
---

diff --git a/FS/FS/part_export/vitelity.pm b/FS/FS/part_export/vitelity.pm
index 22f9ba7d7..cef9ae814 100644
--- a/FS/FS/part_export/vitelity.pm
+++ b/FS/FS/part_export/vitelity.pm
@@ -474,7 +474,10 @@ sub _export_unsuspend {
 sub check_lnp {
   my $self = shift;
 
-  my $in_svcpart = 'IN ('. join( ',', map $_->svcpart, $self->export_svc). ')';
+  my @export_svc = $self->export_svc;
+  return unless @export_svc;
+
+  my $in_svcpart = 'IN ('. join( ',', map $_->svcpart, @export_svc). ')';
 
   foreach my $svc_phone (
     qsearch({ 'table'     => 'svc_phone',