X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FClientAPI%2FMyAccount.pm;h=97e4e22bf3ea65f92e8f854bb556947b84069476;hb=eafc4c26bea9da23b653adb361a05d49324081de;hp=d76891d126ccd774252987f67c8721fd1a02d1cb;hpb=59f7d98b15316f5869c594f441d1b36c4064fe3f;p=freeside.git

diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm
index d76891d12..97e4e22bf 100644
--- a/FS/FS/ClientAPI/MyAccount.pm
+++ b/FS/FS/ClientAPI/MyAccount.pm
@@ -1587,6 +1587,7 @@ sub process_acct_forward {
 
   my $error;
   if ( $old ) {
+    warn "old: $old\n";
     $new->svcnum($old->svcnum);
     my $cust_svc = $old->cust_svc;
     $new->svcpart($old->svcpart);