diff options
author | ivan <ivan> | 2005-05-19 08:43:27 +0000 |
---|---|---|
committer | ivan <ivan> | 2005-05-19 08:43:27 +0000 |
commit | c28a4c33a88dfa354436f81a2e213638088adcf1 (patch) | |
tree | 597383762045368e63c48f625ad3daa64c40f927 /httemplate/misc/email-invoice.cgi | |
parent | f96998102b9bdf8e730b6b55a0aa2b62afffb545 (diff) |
re-email/fax/print links should respect template, also add direct re-send links like the view links and convert view/cust_bill.cgi to proper template
Diffstat (limited to 'httemplate/misc/email-invoice.cgi')
-rwxr-xr-x | httemplate/misc/email-invoice.cgi | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/httemplate/misc/email-invoice.cgi b/httemplate/misc/email-invoice.cgi index a3130c79f..34afa9084 100755 --- a/httemplate/misc/email-invoice.cgi +++ b/httemplate/misc/email-invoice.cgi @@ -4,14 +4,17 @@ my $conf = new FS::Conf; #untaint invnum my($query) = $cgi->keywords; -$query =~ /^(\d*)$/; -my $invnum = $1; +$query =~ /^((.+)-)?(\d+)$/; +my $template = $2; +my $invnum = $3; my $cust_bill = qsearchs('cust_bill',{'invnum'=>$invnum}); die "Can't find invoice!\n" unless $cust_bill; my $error = send_email( $cust_bill->generate_email( - 'from' => $cust_bill->_agent_invoice_from || $conf->config('invoice_from'), + 'from' => + ( $cust_bill->_agent_invoice_from || $conf->config('invoice_from') ), + 'template' => $template, ) ); eidiot($error) if $error; |