From 3a2d8bbc434fbcb96563bd4d437b31db38c76f09 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Thu, 30 Apr 2015 06:58:09 -0700
Subject: service dependencies: cust_svc_suspend_cascade, RT#33685

---
 FS/FS/cust_svc.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'FS/FS/cust_svc.pm')

diff --git a/FS/FS/cust_svc.pm b/FS/FS/cust_svc.pm
index 0465580..986c5ae 100644
--- a/FS/FS/cust_svc.pm
+++ b/FS/FS/cust_svc.pm
@@ -202,7 +202,7 @@ sub suspend {
   my $svc = qsearchs( $svcdb, { 'svcnum' => $self->svcnum } )
     or return '';
 
-  $error = $svc->suspend;
+  my $error = $svc->suspend;
   return $error if $error;
 
   if ( $opt{labels_arryref} ) {
-- 
cgit v1.1