[freeside-commits] branch FREESIDE_4_BRANCH updated. 15b40cdb23b1e3b0e3d8372ead91b8a5244bb0e2

[Ivan]

The branch, FREESIDE_4_BRANCH has been updated
       via  15b40cdb23b1e3b0e3d8372ead91b8a5244bb0e2 (commit)
      from  525c5b843587d7a9c876d875e1ad93458073ac02 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 15b40cdb23b1e3b0e3d8372ead91b8a5244bb0e2
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Tue Oct 6 03:58:41 2015 -0700

    consider "quick payment entry" payments manual for payment receipt purposes, RT#33681

diff --git a/FS/FS/cust_pay.pm b/FS/FS/cust_pay.pm
index cb39d43..e8aa3c7 100644
--- a/FS/FS/cust_pay.pm
+++ b/FS/FS/cust_pay.pm
@@ -1001,7 +1001,7 @@ sub batch_insert {
       }
 
     } elsif ( !$error ) { #normal case: apply payments as usual
-      $cust_pay->cust_main->apply_payments;
+      $cust_pay->cust_main->apply_payments( 'manual'=>1 );
     }
 
   }
@@ -1352,7 +1352,7 @@ sub process_batch_import {
       my $cust_pay = shift;
       my $cust_main = $cust_pay->cust_main
                         or return "can't find customer to which payments apply";
-      my $error = $cust_main->apply_payments_and_credits;
+      my $error = $cust_main->apply_payments_and_credits( 'manual'=>1 );
       return $error
                ? "can't apply payments to customer ".$cust_pay->custnum."$error"
                : '';

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/cust_pay.pm |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)