X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fsvc_acct.pm;h=7d3c9c5fd7f43e34cf146530986dcc85eae1a9ed;hb=ea3c94b9862524f0d17931e77bf3955bac5ad83f;hp=088ccd472afca53d9c1fc0336950bedc00094df9;hpb=259eacca8b815b2bf159e7ee14385e2ac28ed9ee;p=freeside.git diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index 088ccd472..7d3c9c5fd 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -274,7 +274,7 @@ sub table_info { 'cgp_type'=> { label => 'Communigate account type', type => 'select', - select_list => [ ], + select_list => [qw( MultiMailbox TextMailbox MailDirMailbox AGrade BGrade CGrade )], disable_inventory => 1, disable_select => 1, }, @@ -284,6 +284,31 @@ sub table_info { disable_inventory => 1, disable_select => 1, }, + 'cgp_aliases' => { + label => 'Communigate aliases', + type => 'text', + disable_inventory => 1, + disable_select => 1, + }, + 'password_selfchange' => { label => 'Password modification', + type => 'checkbox', + }, + 'password_recover' => { label => 'Password recovery', + type => 'checkbox', + }, + 'cgp_deletemode' => { + label => 'Communigate message delete method', + type => 'select', + select_list => [ 'Move To Trash', 'Immediately', 'Mark' ], + disable_inventory => 1, + disable_select => 1, + }, + 'cgp_emptytrash' => { + label => 'Communigate on logout remove trash', + type => 'text', + disable_inventory => 1, + disable_select => 1, + }, 'quota' => { label => 'Quota', #Mail storage limit type => 'text', @@ -1093,13 +1118,14 @@ sub check { || $self->ut_snumbern('upbytes') || $self->ut_snumbern('downbytes') || $self->ut_snumbern('totalbytes') - || $self->ut_enum( '_password_encoding', - [ '', qw( plain crypt ldap ) ] - ) - || $self->ut_enum( 'password_selfchange', [ '', 'Y' ] ) - || $self->ut_enum( 'password_recover', [ '', 'Y' ] ) - || $self->ut_textn( 'cgp_accessmodes' ) - || $self->ut_alphan( 'cgp_type' ) + || $self->ut_enum('_password_encoding', ['',qw(plain crypt ldap)]) + || $self->ut_enum('password_selfchange', [ '', 'Y' ]) + || $self->ut_enum('password_recover', [ '', 'Y' ]) + || $self->ut_textn('cgp_accessmodes') + || $self->ut_alphan('cgp_type') + || $self->ut_textn('cgp_aliases' ) #well + || $self->ut_alphasn('cgp_deletemode') + || $self->ut_alphan('cgp_emptytrash') ; return $error if $error;