[freeside-commits] freeside/FS/FS/Cron bill.pm,1.9,1.10

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/Cron
In directory wavetail:/tmp/cvs-serv18341

Modified Files:
	bill.pm 
Log Message:
fix small problems with earlier commit: add back earlier commits reverted by this patch, also revert gratuitous whitespace changes

Index: bill.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Cron/bill.pm,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -d -r1.9 -r1.10
--- bill.pm	27 Sep 2007 18:24:33 -0000	1.9
+++ bill.pm	2 Oct 2007 00:29:02 -0000	1.10
@@ -44,7 +44,7 @@
                   )
         )
 END
-  
+
   my $where_event = join(' OR ', map {
     my $eventtable = $_;
 
@@ -76,7 +76,7 @@
 
   my $extra_sql = ( scalar(%search) ? ' AND ' : ' WHERE ' ).
                   "( $where_pkg OR $where_event )";
-  
+
   my @cust_main;
   if ( @ARGV ) {
     @cust_main = map { qsearchs('cust_main', { custnum => $_, %search } ) } @ARGV
@@ -95,8 +95,7 @@
 
   }
   
-  my($cust_main,%saw);
-  foreach $cust_main ( @cust_main ) {
+  foreach my $cust_main ( @cust_main ) {
 
     if ( $opt{'m'} ) {
 
@@ -106,7 +105,7 @@
           'secure' => 'Y',
         };
         my $error = $queue->insert(
-        'custnum'      =>  $cust_main->custnum,
+        'custnum'      => $cust_main->custnum,
         'time'         => $time,
         'invoice_time' => $invoice_time,
         'check_freq'   => $check_freq,
@@ -123,7 +122,7 @@
       );
 
     }
-  
+
   }
 
 }