X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fsvc_domain.pm;h=a97f35bf8962483f16eb7822a56a3cb5ccacac4e;hp=7d527e5be4dd363e328fc9001729d571259e5072;hb=246e76618447bb7ac436e9bfb8c0b042f9613326;hpb=9bdca2fe23584918219395b62effbb9ef0fc5f1c diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm index 7d527e5be..a97f35bf8 100644 --- a/FS/FS/svc_domain.pm +++ b/FS/FS/svc_domain.pm @@ -133,6 +133,13 @@ sub table_info { disable_inventory => 1, disable_select => 1, }, + 'cgp_certificatetype' => { + label => 'Communigate PKI services', + type => 'select', + select_list => __PACKAGE__->cgp_certificatetype_values, + disable_inventory => 1, + disable_select => 1, + }, 'acct_def_cgp_accessmodes' => { label => 'Acct. default Communigate enabled services', @@ -303,9 +310,6 @@ defined. An FS::cust_svc record will be created and inserted. The additional field I should be set to I for new domains, I for transfers, or I for no action (registered elsewhere). -A registration or transfer email will be submitted unless -$FS::svc_domain::whois_hack is true. - The additional field I can be used to manually set the admin contact email address on this email. Otherwise, the svc_acct records for this package (see L) are searched. If there is exactly one svc_acct record @@ -565,7 +569,7 @@ sub check { $recref->{domain} = "$1.$2"; $recref->{suffix} ||= $2; # hmmmmmmmm. - } elsif ( $whois_hack && $recref->{domain} =~ /^([\w\-\.]+)\.(\w+)$/ ) { + } elsif ( $whois_hack && $recref->{domain} =~ /^([\w\-\.\/]+)\.(\w+)$/ ) { $recref->{domain} = "$1.$2"; # need to match a list of suffixes - no guarantee they're top-level.. # http://wiki.mozilla.org/TLD_List @@ -623,6 +627,7 @@ sub domain_record { 'A' => 5, 'TXT' => 6, 'PTR' => 7, + 'SRV' => 8, ); my %sort = (