From a875d5b4fd2d12937c7a53bed773490e2f3ba50f Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 29 Jun 2000 11:12:20 +0000 Subject: [PATCH] don't block on $whois_hack trueness when adding new domains. --- FS/FS/svc_domain.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm index e1e4eb8b5..5cfe69081 100644 --- a/FS/FS/svc_domain.pm +++ b/FS/FS/svc_domain.pm @@ -160,7 +160,7 @@ sub insert { my $whois = $self->whois; return "Domain in use (see whois)" - if ( $self->action eq "N" && $whois ); + if ( $self->action eq "N" && ! $whois_hack && $whois ); return "Domain not found (see whois)" if ( $self->action eq "M" && ! $whois ); @@ -459,7 +459,7 @@ sub submit_internic { =head1 VERSION -$Id: svc_domain.pm,v 1.6 2000-03-01 08:13:59 ivan Exp $ +$Id: svc_domain.pm,v 1.7 2000-06-29 11:12:20 ivan Exp $ =head1 BUGS -- 2.11.0