RT#38671: Do not include charges and credits from failed signup processing [v4 only...

diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm
index 138d0fa..6803a21 100644 (file)
--- a/FS/FS/cust_bill.pm
+++ b/FS/FS/cust_bill.pm
@@ -228,7 +228,7 @@ sub void {
 
   unless (ref($reason) || !$reason) {
     $reason = FS::reason->new_or_existing(
-      'class'  => 'X',
+      'class'  => 'I',
       'type'   => 'Void invoice',
       'reason' => $reason
     );

diff --git a/FS/FS/cust_bill_pkg.pm b/FS/FS/cust_bill_pkg.pm
index aea776a..d3290bf 100644 (file)
--- a/FS/FS/cust_bill_pkg.pm
+++ b/FS/FS/cust_bill_pkg.pm
@@ -337,7 +337,7 @@ sub void {
 
   unless (ref($reason) || !$reason) {
     $reason = FS::reason->new_or_existing(
-      'class'  => 'X',
+      'class'  => 'I',
       'type'   => 'Void invoice',
       'reason' => $reason
     );