From ba20f0f89c57fb294a0bdbfdf80160caac371d82 Mon Sep 17 00:00:00 2001 From: ivan Date: Wed, 12 Nov 2003 11:23:23 +0000 Subject: [PATCH] better error msg --- FS/FS/cust_pkg.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm index 5380e72d7..923378b7f 100644 --- a/FS/FS/cust_pkg.pm +++ b/FS/FS/cust_pkg.pm @@ -150,7 +150,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 } ); -- 2.20.1