X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_main.pm;h=6be6cdb742b80dc2876cc2caa49ef2afe85af7d7;hp=b6600fb298a7ca8243e1cd2b3755603be5c1e2fc;hb=1f637f27c25b2c402261e519094fb8b9d683935a;hpb=7f7fb08833dd4a006adc45fe5deb9931f3aee94e

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index b6600fb29..6be6cdb74 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -493,7 +493,10 @@ sub replace {
                && $_->status eq 'done'
                && $_->statustext
            }
-        $self->open_cust_bill->cust_bill_event
+        map { $_->cust_bill_event }
+          grep { $_->cust_bill_event }
+            $self->open_cust_bill
+
     ) {
       my $error = $cust_bill_event->retry;
       if ( $error ) {
@@ -1237,7 +1240,9 @@ sub collect {
                && $_->status eq 'done'
                && $_->statustext
            }
-        $self->open_cust_bill->cust_bill_event
+        map { $_->cust_bill_event }
+          grep { $_->cust_bill_event }
+            $self->open_cust_bill
     ) {
       my $error = $cust_bill_event->retry;
       if ( $error ) {