diff options
author | ivan <ivan> | 2003-11-12 11:22:53 +0000 |
---|---|---|
committer | ivan <ivan> | 2003-11-12 11:22:53 +0000 |
commit | b16fc4133f24d3844755fe45243e437c9c35769d (patch) | |
tree | e1772a843dbfc6d907da9a274aaf0d4ef47acb08 /FS/FS/cust_pkg.pm | |
parent | 868b7d4ab4af175617ce656a95ebc82b3fd1576f (diff) |
better error msg
Diffstat (limited to 'FS/FS/cust_pkg.pm')
-rw-r--r-- | FS/FS/cust_pkg.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm index d9a6385..5700b65 100644 --- a/FS/FS/cust_pkg.pm +++ b/FS/FS/cust_pkg.pm @@ -148,7 +148,7 @@ sub insert { return $error if $error; my $cust_main = $self->cust_main; - return "Unknown customer ". $self->custnum unless $cust_main; + return "Unknown custnum: ". $self->custnum unless $cust_main; unless ( $disable_agentcheck ) { my $agent = qsearchs( 'agent', { 'agentnum' => $cust_main->agentnum } ); |