X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fsvc_domain.pm;h=8823c7741931272ee1edd11af19180ef2cd26a4a;hb=7b125e587a4d1ee0aca692e23ea7897f671855ae;hp=2a24da427ac5c9b18a61f3ec3c324799ac37e02b;hpb=7a8c7b6f64ac14d555d866f93300e64c47b74a98;p=freeside.git diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm index 2a24da427..8823c7741 100644 --- a/FS/FS/svc_domain.pm +++ b/FS/FS/svc_domain.pm @@ -1,7 +1,8 @@ package FS::svc_domain; use strict; -use vars qw( @ISA $whois_hack $conf +use base qw( FS::svc_Parent_Mixin FS::svc_CGPRule_Mixin FS::svc_Common ); +use vars qw( $whois_hack $conf @defaultrecords $soadefaultttl $soaemail $soaexpire $soamachine $soarefresh $soaretry ); @@ -12,8 +13,6 @@ use Date::Format; use Net::Domain::TLD qw(tld_exists); use FS::Record qw(fields qsearch qsearchs dbh); use FS::Conf; -use FS::svc_Common; -use FS::svc_Parent_Mixin; use FS::cust_svc; use FS::svc_acct; use FS::cust_pkg; @@ -21,8 +20,6 @@ use FS::cust_main; use FS::domain_record; use FS::queue; -@ISA = qw( FS::svc_Parent_Mixin FS::svc_Common ); - #ask FS::UID to run this stuff for us later $FS::UID::callback{'FS::domain'} = sub { $conf = new FS::Conf; @@ -211,6 +208,8 @@ sub table_info { 'trailer' => { label => 'Mail trailer', type => 'textarea', + disable_inventory => 1, + disable_select => 1, }, 'acct_def_cgp_language' => { label => 'Acct. default language',