From 262ad6a5821649093c104d59b33d838c12520d3e Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 19 Feb 2007 15:40:30 +0000
Subject: [PATCH] this should fix Can't call method "part_pkg" on an undefined
 value at .../cust_bill.pm line 434

---
 FS/FS/cust_bill.pm | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm
index 2c0b35388..844d1b867 100644
--- a/FS/FS/cust_bill.pm
+++ b/FS/FS/cust_bill.pm
@@ -432,12 +432,16 @@ sub apply_payments_and_credits {
       my @open_lineitems = $self->open_cust_bill_pkg;
 
       my $max_pay_weight =
-        max( map { $_->cust_pkg->part_pkg->pay_weight || 0 }
-	         @open_lineitems
+        max( map  { $_->part_pkg->pay_weight || 0 }
+             grep { $_ }
+             map  { $_->cust_pkg }
+	          @open_lineitems
 	   );
       my $max_credit_weight =
-        max( map { $_->cust_pkg->part_pkg->credit_weight || 0 }
-	         @open_lineitems
+        max( map  { $_->part_pkg->credit_weight || 0 }
+	     grep { $_ } 
+             map  { $_->cust_pkg }
+                  @open_lineitems
            );
 
       #if both are the same... payments first?  it has to be something
-- 
2.11.0