diff options
author | ivan <ivan> | 2006-09-05 16:44:51 +0000 |
---|---|---|
committer | ivan <ivan> | 2006-09-05 16:44:51 +0000 |
commit | 77002640e60f0b47cf05ed8e173a0f0bcf66e655 (patch) | |
tree | 6448388044f53b29be456ba7f5d0794722f743ac /httemplate/edit/process/cust_refund.cgi | |
parent | 31ce194a3315d3a5a69869b11947d63fc135d9a0 (diff) |
fix refunds, really
Diffstat (limited to 'httemplate/edit/process/cust_refund.cgi')
-rwxr-xr-x | httemplate/edit/process/cust_refund.cgi | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/httemplate/edit/process/cust_refund.cgi b/httemplate/edit/process/cust_refund.cgi index 8f63c1f78..a579a02d8 100755 --- a/httemplate/edit/process/cust_refund.cgi +++ b/httemplate/edit/process/cust_refund.cgi @@ -5,7 +5,7 @@ % %my $error = ''; %if ( $cgi->param('payby') =~ /^(CARD|CHEK)$/ ) { -% my $bop = FS::payby::payby2bop->{$1}; +% my $bop = $FS::payby::payby2bop{$1}; % $cgi->param('refund') =~ /^(\d*)(\.\d{2})?$/ % or die "illegal refund amount ". $cgi->param('refund'); % my $refund = "$1$2"; |