[freeside-commits] freeside/FS/FS cust_main.pm, 1.464.2.9, 1.464.2.10

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv24295/FS/FS

Modified Files:
      Tag: FREESIDE_1_9_BRANCH
	cust_main.pm 
Log Message:
fix bulk sending of customer notices, RT#6778

Index: cust_main.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_main.pm,v
retrieving revision 1.464.2.9
retrieving revision 1.464.2.10
diff -u -d -r1.464.2.9 -r1.464.2.10
--- cust_main.pm	29 Nov 2009 23:15:37 -0000	1.464.2.9
+++ cust_main.pm	30 Nov 2009 00:38:11 -0000	1.464.2.10
@@ -2479,7 +2479,7 @@
 
 =item invoice_terms
 
-Options terms to be printed on this invoice.  Otherwise, customer-specific
+Optional terms to be printed on this invoice.  Otherwise, customer-specific
 terms or the default terms are used.
 
 =back
@@ -8305,13 +8305,20 @@
   # amounts
   ##
 
-  #my $balance_sql = $class->balance_sql();
-  my $balance_sql = FS::cust_main->balance_sql();
+  if ( $params->{'current_balance'} ) {
 
-  my @current_balance = @{ $params->{'current_balance'} };
+    #my $balance_sql = $class->balance_sql();
+    my $balance_sql = FS::cust_main->balance_sql();
 
-  push @where, map { s/current_balance/$balance_sql/; $_ }
-                   @current_balance;
+    my @current_balance =
+      ref( $params->{'current_balance'} )
+      ? @{ $params->{'current_balance'} }
+      :  ( $params->{'current_balance'} );
+
+    push @where, map { s/current_balance/$balance_sql/; $_ }
+                     @current_balance;
+
+  }
 
   ##
   # custbatch