diff options
| -rw-r--r-- | FS/FS/part_export/vitelity.pm | 5 |
1 files changed, 4 insertions, 1 deletions
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', |