diff options
| author | ivan <ivan> | 2003-09-10 22:10:19 +0000 | 
|---|---|---|
| committer | ivan <ivan> | 2003-09-10 22:10:19 +0000 | 
| commit | 7bf05802c8af3664bc5f59860eafded8521690b7 (patch) | |
| tree | 20bef8b107347e1ffca8968b767118f6f7f65f5e | |
| parent | 36a4d7c6827d4681f190c6c2b2ed4af0d61de4b0 (diff) | |
communigate pro quota bs
| -rw-r--r-- | FS/FS/part_export/communigate_pro.pm | 9 | 
1 files changed, 6 insertions, 3 deletions
| diff --git a/FS/FS/part_export/communigate_pro.pm b/FS/FS/part_export/communigate_pro.pm index 54a8277cb..ae20e2423 100644 --- a/FS/FS/part_export/communigate_pro.pm +++ b/FS/FS/part_export/communigate_pro.pm @@ -10,15 +10,18 @@ sub rebless { shift; }  sub _export_insert {    my( $self, $svc_acct ) = (shift, shift); -  $self->communigate_pro_queue( $svc_acct->svcnum, 'CreateAccount', +  my @options = ( $svc_acct->svcnum, 'CreateAccount',      'accountName'    => $svc_acct->email,      'accountType'    => $self->option('accountType'), -    'externalFlag'   => $self->option('externalFlag'),      'AccessModes'    => $self->option('AccessModes'),      'RealName'       => $svc_acct->finger, -    'MaxAccountSize' => $svc_acct->quota,      'Password'       => $svc_acct->_password,    ); +  push @options, 'MaxAccountSize' => $svc_acct->quota if $svc_acct->quota; +  push @options, 'externalFlag'   => $self->option('externalFlag') +    if $self->option('externalFlag'); + +  $self->communigate_pro_queue( @options );  }  sub _export_replace { | 
