minor syntax error
authorMark Wells <mark@freeside.biz>
Thu, 23 Jan 2014 22:09:45 +0000 (14:09 -0800)
committerMark Wells <mark@freeside.biz>
Thu, 23 Jan 2014 22:09:45 +0000 (14:09 -0800)
httemplate/edit/process/quick-cust_pkg.cgi

index 95c9243..c3ab6fe 100644 (file)
@@ -134,7 +134,7 @@ my %hash = (
 $hash{'custnum'} = $cust_main->custnum if $cust_main;
 
 my @cust_pkg_usageprice = ();
 $hash{'custnum'} = $cust_main->custnum if $cust_main;
 
 my @cust_pkg_usageprice = ();
-foreach my $quantity_param ( grep ( $cgi->param($_) && $cgi->param($_) > 0 ),
+foreach my $quantity_param ( grep { $cgi->param($_) && $cgi->param($_) > 0 }
                                grep /^usagepricenum(\d+)_quantity$/,
                                  $cgi->param
                            )
                                grep /^usagepricenum(\d+)_quantity$/,
                                  $cgi->param
                            )