diff options
| author | ivan <ivan> | 2004-04-13 22:30:08 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2004-04-13 22:30:08 +0000 |
| commit | f60227b3ca8e457f4128dd4b1b10ae53ec06fc77 (patch) | |
| tree | 91540a510bcd1dbd673280445cbdb3bc4bea8875 | |
| parent | 78bcdfeb435bca3f3e9aa5963baec51d2dce3ae4 (diff) | |
remove dependancy on Net::Whois that wasn't being used anyway
| -rw-r--r-- | FS/FS/svc_domain.pm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm index f457a7679..45fcdd24a 100644 --- a/FS/FS/svc_domain.pm +++ b/FS/FS/svc_domain.pm @@ -9,7 +9,7 @@ use Carp; use Mail::Internet 1.44; use Mail::Header; use Date::Format; -use Net::Whois 1.0; +#use Net::Whois::Raw; use FS::Record qw(fields qsearch qsearchs dbh); use FS::Conf; use FS::svc_Common; @@ -391,15 +391,16 @@ sub catchall_svc_acct { =item whois -Returns the Net::Whois::Domain object (see L<Net::Whois>) for this domain, or -undef if the domain is not found in whois. +# Returns the Net::Whois::Domain object (see L<Net::Whois>) for this domain, or +# undef if the domain is not found in whois. (If $FS::svc_domain::whois_hack is true, returns that in all cases instead.) =cut sub whois { - $whois_hack or new Net::Whois::Domain $_[0]->domain; + #$whois_hack or new Net::Whois::Domain $_[0]->domain; + $whois_hack or die "whois_hack not set...\n"; } =item _whois |