From: Ivan Kohler <ivan@freeside.biz>
Date: Sun, 5 Jan 2014 03:50:32 +0000 (-0800)
Subject: fix service over-display resulting from changes checked in with fe4515eb37d76849dd08c... 
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=994d99c9e0c6888d3fa55b4b1169a7bc9d894814

fix service over-display resulting from changes checked in with fe4515eb37d76849dd08c62782d86bc7ba311dcd
---

diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index ce9869056..afdd41d59 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -2750,12 +2750,12 @@ the results.
 sub cust_svc {
   my $self = shift;
   cluck "cust_pkg->cust_svc called" if $DEBUG > 2;
-  $self->_sort_cust_svc( $self->cust_svc_unsorted_arrayref );
+  $self->_sort_cust_svc( $self->cust_svc_unsorted_arrayref(@_) );
 }
 
 sub cust_svc_unsorted {
   my $self = shift;
-  @{ $self->cust_svc_unsorted_arrayref };
+  @{ $self->cust_svc_unsorted_arrayref(@_) };
 }
 
 sub cust_svc_unsorted_arrayref {