diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2014-02-27 00:29:17 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2014-02-27 00:29:17 -0800 |
| commit | 4aa7ddaf3e491d34a8caaa7869ccd83dc6d50d52 (patch) | |
| tree | 872c01f597d0164dd56bde4e0818397436432fcf /httemplate/elements/email-link.html | |
| parent | e64b3d81da1d0a7026631e893f708c675a0cfa83 (diff) | |
agent-virt "email a notice to this customer" from address, RT#27424
Diffstat (limited to 'httemplate/elements/email-link.html')
| -rw-r--r-- | httemplate/elements/email-link.html | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/httemplate/elements/email-link.html b/httemplate/elements/email-link.html index 692e5bc2e..2612faabb 100644 --- a/httemplate/elements/email-link.html +++ b/httemplate/elements/email-link.html @@ -1,9 +1,10 @@ % if ( $FS::CurrentUser::CurrentUser->access_right('Bulk send customer notices') ) { -<A HREF="<%$p%>misc/email-customers.html?table=<%$table%>&<%$query%>"><%$label%></A> +<A HREF="<%$p%>misc/email-customers.html?table=<%$table%>&agent_virt_agentnum=<%$agent_virt_agentnum%>&<%$query%>"><%$label%></A> % } <%init> my %opt = @_; my $table = $opt{'table'}; +my $agent_virt_agentnum = $opt{'agent_virt_agentnum'}; my $search_hash = $opt{'search_hash'}; die "'table' required" if !$table; die "'search_hash' required" if !$search_hash; |