diff options
-rw-r--r-- | httemplate/edit/process/quick-charge.cgi | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/httemplate/edit/process/quick-charge.cgi b/httemplate/edit/process/quick-charge.cgi index e87be6272..6de746ea4 100644 --- a/httemplate/edit/process/quick-charge.cgi +++ b/httemplate/edit/process/quick-charge.cgi @@ -83,9 +83,11 @@ if ( $param->{'pkgnum'} =~ /^(\d+)$/ ) { #modifying an existing one-time charge my $amount = $1; my $setup_cost = ''; - $param->{"setup_cost"} =~ /^\s*(\d*(?:\.?\d{1,2}))\s*$/ - or $error .= "Illegal setup_cost " . $param->{"setup_cost"} . " "; - my $setup_cost = $1; + if ( $param->{setup_cost} =~ /\S/ ) { + $param->{setup_cost} =~ /^\s*(\d*(?:\.?\d{1,2}))\s*$/ + or $error .= "Illegal setup_cost " . $param->{setup_cost} . " "; + $setup_cost = $1; + } my $quantity = 1; if ( $cgi->param('quantity') =~ /^\s*(\d+)\s*$/ ) { |