X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fsvc_domain.cgi;h=9b54422d36aeb3521de62957462b39258628abef;hp=369d6a0fe8fbd3655fd1fab287f090ac35576fe0;hb=3f2a7b01b59902faed5767d81e2959e131bdbdfd;hpb=cc647ae934abe5c9d9a5fc12f020adfc566349d9 diff --git a/httemplate/edit/svc_domain.cgi b/httemplate/edit/svc_domain.cgi index 369d6a0fe..9b54422d3 100755 --- a/httemplate/edit/svc_domain.cgi +++ b/httemplate/edit/svc_domain.cgi @@ -16,6 +16,7 @@ % } else { <% $domain %> + % } % if ($export) { @@ -34,24 +35,55 @@ Available top-level domains: <% $export->option('tlds') %> +% if($export->option('auoptions')) { +% # XXX: this whole thing should be done like svc_Common with label_fixup, etc. eventually + <% include('/elements/tr-select.html', + 'field' => 'au_eligibiilty_type', + 'label' => 'AU Eligibility Type', + 'value' => $svc_domain->au_eligibility_type, + 'options' => $svc_domain->au_eligibility_type_values, + ) + %> + <% include('/elements/tr-input-text.html', + 'field' => 'au_registrant_name', + 'label' => 'AU Registrant Name', + 'value' => $svc_domain->au_registrant_name, + ) + %> +% } + % } -% if ( $part_svc->part_svc_column('max_accounts')->columnflag =~ /^[FA]$/ ) { - +% if ( $part_svc->part_svc_column('quota')->columnflag =~ /^[FA]$/ ) { + % } else { - Maximum number of accounts + Quota - + % } - +<% include('svc_domain/communigate-basics.html', + 'svc_domain' => $svc_domain, + 'part_svc' => $part_svc, + 'communigate' => $communigate, + ) +%> +
+ +<% include('svc_domain/communigate-acct_defaults.html', + 'svc_domain' => $svc_domain, + 'part_svc' => $part_svc, + 'communigate' => $communigate, + ) +%> + @@ -118,21 +150,14 @@ my $action = $svcnum ? 'Edit' : 'Add'; my $svc = $part_svc->getfield('svc'); -my @exports = $part_svc->part_export(); - -my $registrar; -my $export; +my $communigate = scalar($part_svc->part_export('communigate_pro')); + # || scalar($part_svc->part_export('communigate_pro_singledomain')); # Find the first export that does domain registration -foreach (@exports) { - $export = $_ if $_->can('registrar'); -} +my @exports = grep $_->can('registrar'), $part_svc->part_export; +my $export = $exports[0]; # If we have a domain registration export, get the registrar object -if ($export) { - $registrar = $export->registrar; -} - -my $otaker = getotaker; +my $registrar = $export ? $export->registrar : ''; my $domain = $svc_domain->domain;