diff options
| author | ivan <ivan> | 2003-11-11 15:03:54 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2003-11-11 15:03:54 +0000 |
| commit | 868b7d4ab4af175617ce656a95ebc82b3fd1576f (patch) | |
| tree | d981a568f526cbfcf7730e2d9a3754f28b8b0fa9 /FS/FS/svc_Common.pm | |
| parent | 267aa3cd085d1563915207b5bb31df8dc3ab2fb8 (diff) | |
also make setx behave when setting svcnum during an import
Diffstat (limited to 'FS/FS/svc_Common.pm')
| -rw-r--r-- | FS/FS/svc_Common.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/svc_Common.pm b/FS/FS/svc_Common.pm index fa7996d70..89da604ef 100644 --- a/FS/FS/svc_Common.pm +++ b/FS/FS/svc_Common.pm @@ -312,7 +312,7 @@ sub setx { #get part_svc my $svcpart; - if ( $self->svcnum ) { + if ( $self->svcnum && qsearchs('cust_svc', {'svcnum'=>$self->svcnum}) ) { my $cust_svc = $self->cust_svc; return "Unknown svcnum" unless $cust_svc; $svcpart = $cust_svc->svcpart; |