From 581c4882747d0a02fa41fd079f401358cf87b48d Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 29 Nov 2011 02:36:49 +0000
Subject: [PATCH] add forward and spam setting to inter.net portal, RT#13656

---
 FS/FS/ClientAPI/MyAccount.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm
index 402139732..1b32ce31e 100644
--- a/FS/FS/ClientAPI/MyAccount.pm
+++ b/FS/FS/ClientAPI/MyAccount.pm
@@ -1570,6 +1570,7 @@ sub process_acct_forward {
                            );
 
   if ( $p->{'dst'} eq '' ) {
+    warn Dumper($p);
     if ( $old ) {
       my $error = $old->delete;
       return { 'error' => $error };
@@ -1592,7 +1593,9 @@ sub process_acct_forward {
     my $conf = new FS::Conf;
     $new->svcpart($conf->config('selfservice-svc_forward_svcpart'));
     $new->pkgnum($old->cust_svc->pkgnum);
+    warn Dumper($new);
     $error = $new->insert;
+    warn $error;
   }
 
   return { 'error' => $error };
-- 
2.11.0