diff options
author | Ivan Kohler <ivan@freeside.biz> | 2022-04-27 12:18:46 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2022-04-27 12:18:46 -0700 |
commit | 0c1bbe3f62b483feb841b8b958dc468e1c457c45 (patch) | |
tree | 3f95b35de10b09a32fcdef41e74df072b5a74f7a | |
parent | 32e9b8146661a5bc6b340b09dacc8a70813555f6 (diff) |
quiet warnings about CGI::param in list context
-rwxr-xr-x | httemplate/edit/process/cust_main.cgi | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/httemplate/edit/process/cust_main.cgi b/httemplate/edit/process/cust_main.cgi index 18017fd..d4578d2 100755 --- a/httemplate/edit/process/cust_main.cgi +++ b/httemplate/edit/process/cust_main.cgi @@ -62,7 +62,7 @@ $cgi->param('duplicate_of_custnum') =~ /^(\d+)$/; my $duplicate_of = $1; # if this is enabled, enforce it -if ( $conf->exists('agent-ship_address', $cgi->param('agentnum')) ) { +if ( $conf->exists('agent-ship_address', scalar($cgi->param('agentnum'))) ) { my $agent = FS::agent->by_key($cgi->param('agentnum')); my $agent_cust_main = $agent->agent_cust_main; if ( $agent_cust_main ) { |