diff options
| -rw-r--r-- | FS/FS/ClientAPI/MyAccount.pm | 1 |
1 files changed, 1 insertions, 0 deletions
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); |