projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
7738e20
)
freeside *SUSPENDED* -> CP set_mailbox_status OTHER/OTHER_BOUNCE
author
ivan
<ivan>
Fri, 22 Feb 2002 08:58:11 +0000
(08:58 +0000)
committer
ivan
<ivan>
Fri, 22 Feb 2002 08:58:11 +0000
(08:58 +0000)
FS/FS/svc_acct.pm
patch
|
blob
|
history
diff --git
a/FS/FS/svc_acct.pm
b/FS/FS/svc_acct.pm
index
2a0c904
..
314a752
100644
(file)
--- a/
FS/FS/svc_acct.pm
+++ b/
FS/FS/svc_acct.pm
@@
-840,12
+840,25
@@
sub cp_change {
#Debug => 1,
) or die "$@\n";
#Debug => 1,
) or die "$@\n";
+ if ( $password =~ /^\*SUSPENDED\* (.*)$/ ) {
+ $password = $1;
+ $app->set_mailbox_status(
+ Other => 'T',
+ Other_Bounce => 'T',
+ );
+ } else {
+ $app->set_mailbox_status(
+ Other => 'F',
+ Other_Bounce => 'F',
+ );
+ }
+ die $app->message."\n" unless $app->ok;
+
$app->change_mailbox(
Domain => $mydomain,
Mailbox => $username,
Password => $password,
);
$app->change_mailbox(
Domain => $mydomain,
Mailbox => $username,
Password => $password,
);
-
die $app->message."\n" unless $app->ok;
}
die $app->message."\n" unless $app->ok;
}