projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
df33a04
)
remove dependancy on Net::Whois that wasn't being used anyway
author
ivan
<ivan>
Tue, 13 Apr 2004 22:30:48 +0000
(22:30 +0000)
committer
ivan
<ivan>
Tue, 13 Apr 2004 22:30:48 +0000
(22:30 +0000)
FS/FS/svc_domain.pm
patch
|
blob
|
history
diff --git
a/FS/FS/svc_domain.pm
b/FS/FS/svc_domain.pm
index
4dd6342
..
b713e3e
100644
(file)
--- a/
FS/FS/svc_domain.pm
+++ b/
FS/FS/svc_domain.pm
@@
-7,7
+7,7
@@
use vars qw( @ISA $whois_hack $conf
);
use Carp;
use Date::Format;
);
use Carp;
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;
use FS::Record qw(fields qsearch qsearchs dbh);
use FS::Conf;
use FS::svc_Common;
@@
-386,15
+386,16
@@
sub catchall_svc_acct {
=item whois
=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 {
(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
}
=item _whois