From: Ivan Kohler <ivan@freeside.biz>
Date: Mon, 9 Jun 2014 18:10:22 +0000 (-0700)
Subject: fix cust_svc_unsorted when there are no services, RT#27267
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=a8fac25bb0a138fd8fa7d87c6e4cee1de6fd4748

fix cust_svc_unsorted when there are no services, RT#27267
---

diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index a1f2cb1a5..4a98b7329 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -2818,7 +2818,7 @@ sub cust_svc_unsorted {
 sub cust_svc_unsorted_arrayref {
   my $self = shift;
 
-  return () unless $self->num_cust_svc(@_);
+  return [] unless $self->num_cust_svc(@_);
 
   my %opt = ();
   if ( @_ && $_[0] =~ /^\d+/ ) {