[freeside-commits] freeside/FS/FS/ClientAPI MyAccount.pm, 1.165, 1.166

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/ClientAPI
In directory wavetail.420.am:/tmp/cvs-serv28808/FS/FS/ClientAPI

Modified Files:
	MyAccount.pm 
Log Message:
add forward and spam setting to inter.net portal, RT#13656

Index: MyAccount.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/ClientAPI/MyAccount.pm,v
retrieving revision 1.165
retrieving revision 1.166
diff -u -w -d -r1.165 -r1.166
--- MyAccount.pm	29 Nov 2011 02:21:37 -0000	1.165
+++ MyAccount.pm	29 Nov 2011 02:36:46 -0000	1.166
@@ -1570,6 +1570,7 @@
                            );
 
   if ( $p->{'dst'} eq '' ) {
+    warn Dumper($p);
     if ( $old ) {
       my $error = $old->delete;
       return { 'error' => $error };
@@ -1592,7 +1593,9 @@
     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 };