projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
51ca515
)
add forward and spam setting to inter.net portal, RT#13656
author
ivan
<ivan>
Tue, 29 Nov 2011 02:21:40 +0000
(
02:21
+0000)
committer
ivan
<ivan>
Tue, 29 Nov 2011 02:21:40 +0000
(
02:21
+0000)
FS/FS/ClientAPI/MyAccount.pm
patch
|
blob
|
history
FS/FS/Conf.pm
patch
|
blob
|
history
diff --git
a/FS/FS/ClientAPI/MyAccount.pm
b/FS/FS/ClientAPI/MyAccount.pm
index
6e56d78
..
4021397
100644
(file)
--- 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 $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 {
$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;
}
$error = $new->insert;
}
diff --git
a/FS/FS/Conf.pm
b/FS/FS/Conf.pm
index
a3fabc7
..
acaac75
100644
(file)
--- 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.',
'key' => 'selfservice-password_reset_verification',
'section' => 'self-service',
'description' => 'If enabled, specifies the type of verification required for self-service password resets.',