[freeside-commits] freeside/httemplate/edit/process cust_pay.cgi, 1.20, 1.21

[Erik Levinson]

Update of /home/cvs/cvsroot/freeside/httemplate/edit/process
In directory wavetail.420.am:/tmp/cvs-serv6880/httemplate/edit/process

Modified Files:
	cust_pay.cgi 
Log Message:
modify backdated payment application behaviour, RT11870

Index: cust_pay.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/edit/process/cust_pay.cgi,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -w -d -r1.20 -r1.21
--- cust_pay.cgi	23 May 2011 16:25:27 -0000	1.20
+++ cust_pay.cgi	6 Jul 2011 04:15:35 -0000	1.21
@@ -7,7 +7,8 @@
 %  if ( $cgi->param('apply') eq 'yes' ) {
 %    my $cust_main = qsearchs('cust_main', { 'custnum' => $linknum })
 %      or die "unknown custnum $linknum";
-%    $cust_main->apply_payments( 'manual' => 1 );
+%    $cust_main->apply_payments( 'manual' => 1,
+%                                'backdate_application' => ($_date < time-86400) );
 %  }
 %  if ( $link eq 'popup' ) {
 %