omit listing spurious customer details
authorivan <ivan>
Thu, 18 Jun 2009 11:09:28 +0000 (11:09 +0000)
committerivan <ivan>
Thu, 18 Jun 2009 11:09:28 +0000 (11:09 +0000)
FS/FS/part_pkg/agent.pm

index 70ad2ad..880d135 100644 (file)
@@ -138,7 +138,8 @@ sub calc_recur {
 
         $pkg_charge += $recur_charge;
 
-        push @$details, $pkg_details;
+        push @$details, $pkg_details
+          if $pkg_charge;
         $total_agent_charge += $pkg_charge;
 
       } #foreach $cust_pkg