diff options
| author | ivan <ivan> | 2003-03-11 11:41:05 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2003-03-11 11:41:05 +0000 |
| commit | 332bed7a219123f08bbcb02048ab8803f7b6f0ea (patch) | |
| tree | 02e0f6d5acbecca3a7a2238a170f03e6c4ff6944 | |
| parent | b60dae0e1044ab0bb1501d368332c22ba2a14ecc (diff) | |
another pg7.3 fix
| -rw-r--r-- | FS/FS/svc_domain.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm index 637d0493c..9a9f3b360 100644 --- a/FS/FS/svc_domain.pm +++ b/FS/FS/svc_domain.pm @@ -386,8 +386,10 @@ sub check { $recref->{action} =~ /^(M|N)$/ or return "Illegal action"; $recref->{action} = $1; - my $svc_acct = qsearchs( 'svc_acct', { 'svcnum' => $recref->{catchall} } ); - return "Unknown catchall" unless $svc_acct || ! $recref->{catchall}; + if ( $recref->{catchall} ne '' ) { + my $svc_acct = qsearchs( 'svc_acct', { 'svcnum' => $recref->{catchall} } ); + return "Unknown catchall" unless $svc_acct; + } $self->ut_textn('purpose'); |