diff options
author | Ivan Kohler <ivan@freeside.biz> | 2014-01-27 21:32:11 -0800 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2014-01-27 21:32:11 -0800 |
commit | 082486da42e753b3d3fe847578e60af3ac8432fa (patch) | |
tree | 543ccadbfc18bdea2c3dc4191682326789ff26ac /httemplate/misc | |
parent | 5ffd80e8e6ac4554fc4515b018eaf0354ebcdc9a (diff) |
add agent_custid to cust_main-custom_link, RT#21998
Diffstat (limited to 'httemplate/misc')
-rw-r--r-- | httemplate/misc/custom_link_proxy.cgi | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/httemplate/misc/custom_link_proxy.cgi b/httemplate/misc/custom_link_proxy.cgi index f3c6e376e..db9a048be 100644 --- a/httemplate/misc/custom_link_proxy.cgi +++ b/httemplate/misc/custom_link_proxy.cgi @@ -14,12 +14,14 @@ my $conf = new FS::Conf; my $url = $conf->config('cust_main-custom_link'); my $agentnum = $cust_main->agentnum; +my $agent_custid = $cust_main->agent_custid; my $curuser = $FS::CurrentUser::CurrentUser; my $usernum = $curuser->usernum; # like eval(qq("$url")) but with fewer things that can go wrong # and if $custnum isn't mentioned, assume it goes at the end $url =~ s/\$custnum/$custnum/ or $url .= $custnum; $url =~ s/\$agentnum/$agentnum/; +$url =~ s/\$agent_custid/$agent_custid/; $url =~ s/\$usernum/$usernum/; #warn $url; |