diff options
author | ivan <ivan> | 2010-04-19 01:27:00 +0000 |
---|---|---|
committer | ivan <ivan> | 2010-04-19 01:27:00 +0000 |
commit | ad7f49821d40ffd099a45acc32ba91e0e211aede (patch) | |
tree | 8228c5db1da46fd27a84a47dc0267b4ea6a9b297 /FS/FS/part_export/communigate_pro.pm | |
parent | a81b07fba385be4599feec950d5b108e3c107d0d (diff) |
communigate provisioning phase 2: add svc_domain.trailer -> communigate TrailerText, RT#7514
Diffstat (limited to 'FS/FS/part_export/communigate_pro.pm')
-rw-r--r-- | FS/FS/part_export/communigate_pro.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/FS/FS/part_export/communigate_pro.pm b/FS/FS/part_export/communigate_pro.pm index 7f5cece..37cc6ef 100644 --- a/FS/FS/part_export/communigate_pro.pm +++ b/FS/FS/part_export/communigate_pro.pm @@ -141,6 +141,8 @@ sub _export_insert_svc_domain { if $svc_domain->max_accounts; $settings{'AdminDomainName'} = $svc_domain->parent_svc_x->domain if $svc_domain->parent_svcnum; + $settings{'TrailerText'} = $svc_domain->trailer + if $svc_domain->trailer; my @options = ( $create, $svc_domain->domain, \%settings ); @@ -325,6 +327,8 @@ sub _export_replace_svc_domain { my %settings = (); $settings{'AccountsLimit'} = $new->max_accounts if $old->max_accounts ne $new->max_accounts; + $settings{'TrailerText'} = $new->trailer + if $old->trailer ne $new->trailer; $settings{'DomainAccessModes'} = $new->cgp_accessmodes if $old->cgp_accessmodes ne $new->cgp_accessmodes; $settings{'AdminDomainName'} = @@ -865,6 +869,7 @@ sub communigate_pro_command { #subroutine, not method my( $machine, $port, $login, $password, $method, @args ) = @_; eval "use CGP::CLI"; + die $@ if $@; my $cli = new CGP::CLI( { 'PeerAddr' => $machine, |