diff options
| author | ivan <ivan> | 2011-11-29 02:21:40 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2011-11-29 02:21:40 +0000 |
| commit | 80cba1ee545e6d8799530d9c64521e782b6e7c4f (patch) | |
| tree | f68c0beef7f4f4ca3a6227a4a0b9f9a830e0d300 | |
| parent | 51ca515e0f279bf980fbbf57b990b9bf12dc13f7 (diff) | |
add forward and spam setting to inter.net portal, RT#13656
| -rw-r--r-- | FS/FS/ClientAPI/MyAccount.pm | 6 | ||||
| -rw-r--r-- | FS/FS/Conf.pm | 7 |
2 files changed, 13 insertions, 0 deletions
diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm index 6e56d782d..402139732 100644 --- a/FS/FS/ClientAPI/MyAccount.pm +++ b/FS/FS/ClientAPI/MyAccount.pm @@ -1584,8 +1584,14 @@ sub process_acct_forward { my $error; if ( $old ) { $new->svcnum($old->svcnum); + my $cust_svc = $old->cust_svc; + $new->svcpart($old->svcpart); + $new->pkgnuym($old->pkgnum); $error = $new->replace($old); } else { + my $conf = new FS::Conf; + $new->svcpart($conf->config('selfservice-svc_forward_svcpart')); + $new->pkgnum($old->cust_svc->pkgnum); $error = $new->insert; } diff --git a/FS/FS/Conf.pm b/FS/FS/Conf.pm index a3fabc7d4..acaac7516 100644 --- a/FS/FS/Conf.pm +++ b/FS/FS/Conf.pm @@ -2475,6 +2475,13 @@ and customer address. Include units.', }, { + 'key' => 'selfservice-svc_forward_svcpart', + 'section' => 'self-service', + 'description' => 'Service for self-service forward editing.', + 'type' => 'select-part_svc', + }, + + { 'key' => 'selfservice-password_reset_verification', 'section' => 'self-service', 'description' => 'If enabled, specifies the type of verification required for self-service password resets.', |