From bf9b266acafce57cfa532801c00d45dc4eab765c Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Wed, 27 Apr 2022 12:18:43 -0700 Subject: [PATCH] quiet warnings about CGI::param in list context --- httemplate/edit/process/cust_main.cgi | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/httemplate/edit/process/cust_main.cgi b/httemplate/edit/process/cust_main.cgi index 18017fdb9..d4578d296 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 ) { -- 2.11.0