From 512dd310b4095d5163913acaeb9a6df34d882f6f Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Fri, 28 Apr 2017 08:25:50 -0700
Subject: [PATCH] don't error out with a vitely export disconnected from any
services, RT#75736
---
FS/FS/part_export/vitelity.pm | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
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',
--
2.20.1