projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
html table fix
[freeside.git]
/
httemplate
/
edit
/
process
/
quick-charge.cgi
diff --git
a/httemplate/edit/process/quick-charge.cgi
b/httemplate/edit/process/quick-charge.cgi
index
49175d8
..
477f585
100644
(file)
--- a/
httemplate/edit/process/quick-charge.cgi
+++ b/
httemplate/edit/process/quick-charge.cgi
@@
-12,7
+12,12
@@
my $amount = $1;
my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } )
or die "unknown custnum $custnum";
my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } )
or die "unknown custnum $custnum";
-my $error = $cust_main->charge( $amount, $cgi->param('pkg') );
+my $error = $cust_main->charge(
+ $amount,
+ $cgi->param('pkg'),
+ '$'. sprintf("%.2f",$amount),
+ $cgi->param('taxclass')
+);
if ($error) {
%>
if ($error) {
%>