diff options
| author | ivan <ivan> | 2000-06-29 11:12:20 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2000-06-29 11:12:20 +0000 |
| commit | a875d5b4fd2d12937c7a53bed773490e2f3ba50f (patch) | |
| tree | 517d12f2f2f6bbb9064450524ee37a544593f069 /FS/FS/svc_domain.pm | |
| parent | 543ac5d57838319516d325dbeac898f111065bc3 (diff) | |
don't block on $whois_hack trueness when adding new domains.
Diffstat (limited to 'FS/FS/svc_domain.pm')
| -rw-r--r-- | FS/FS/svc_domain.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm index e1e4eb8..5cfe690 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 |