summaryrefslogtreecommitdiff
path: root/FS/FS/svc_acct.pm
diff options
context:
space:
mode:
authorivan <ivan>2006-08-09 10:47:18 +0000
committerivan <ivan>2006-08-09 10:47:18 +0000
commit97316d268e5751a1d08a0a37e5a0456f2ce4815c (patch)
treec4b7e57e0852ece5715f4f5ea5f6118ea5a5c3ef /FS/FS/svc_acct.pm
parent95f4195da730f6d40faee94aa7a3108b82823d8d (diff)
self-service interface: add proper password changer and prevent "Setup my services" provisioner from showing broken links for services not handled yet
Diffstat (limited to 'FS/FS/svc_acct.pm')
-rw-r--r--FS/FS/svc_acct.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm
index c50dfd540..b201f2353 100644
--- a/FS/FS/svc_acct.pm
+++ b/FS/FS/svc_acct.pm
@@ -484,6 +484,11 @@ sub replace {
my $error;
warn "$me replacing $old with $new\n" if $DEBUG;
+ # We absolutely have to have an old vs. new record to make this work.
+ if (!defined($old)) {
+ $old = qsearchs( 'svc_acct', { 'svcnum' => $new->svcnum } );
+ }
+
return "can't modify system account" if $old->_check_system;
{