diff options
author | ivan <ivan> | 2010-02-17 08:32:53 +0000 |
---|---|---|
committer | ivan <ivan> | 2010-02-17 08:32:53 +0000 |
commit | cc647ae934abe5c9d9a5fc12f020adfc566349d9 (patch) | |
tree | c2181b801385a5b040186f9414c2a84e4cf20766 /FS/FS/svc_domain.pm | |
parent | af5b5947a7bcb13a94a84bb2b20c80a2778e0f35 (diff) |
communigate pro provisioning, RT#7083
Diffstat (limited to 'FS/FS/svc_domain.pm')
-rw-r--r-- | FS/FS/svc_domain.pm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm index 8ca30c2ff..89ee26aff 100644 --- a/FS/FS/svc_domain.pm +++ b/FS/FS/svc_domain.pm @@ -89,6 +89,8 @@ FS::svc_Common. The following fields are currently supported: =item expiration_date - UNIX timestamp +=item max_accounts + =back =head1 METHODS @@ -109,6 +111,9 @@ sub table_info { 'cancel_weight' => 60, 'fields' => { 'domain' => 'Domain', + 'max_accounts' => { label => 'Maximum number of accounts', + 'disable_inventory' => 1, + }, }, }; } @@ -290,7 +295,8 @@ sub replace { : $new->replace_old; return "Can't change domain - reorder." - if $old->getfield('domain') ne $new->getfield('domain'); + if $old->getfield('domain') ne $new->getfield('domain') + && ! $conf->exists('svc_domain-edit_domain'); # Better to do it here than to force the caller to remember that svc_domain is weird. $new->setfield(action => 'I'); @@ -335,6 +341,7 @@ sub check { my $error = $self->ut_numbern('svcnum') || $self->ut_numbern('catchall') + || $self->ut_numbern('max_accounts') ; return $error if $error; @@ -429,6 +436,7 @@ sub domain_record { 'PTR' => sub { $_[0]->reczone <=> $_[1]->reczone }, ); + map { $_ } #return $self->num_domain_record( PARAMS ) unless wantarray; sort { $order{$a->rectype} <=> $order{$b->rectype} or &{ $sort{$a->rectype} || sub { 0; } }($a, $b) } |