freeside/FS/FS cust_main.pm,1.92.2.45,1.92.2.46

[ivan]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory pouncequick:/tmp/cvs-serv32052

Modified Files:
      Tag: FREESIDE_1_4_BRANCH
	cust_main.pm 
Log Message:
eliminate spurious "multiple records in scalar search" warning

Index: cust_main.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_main.pm,v
retrieving revision 1.92.2.45
retrieving revision 1.92.2.46
diff -u -d -r1.92.2.45 -r1.92.2.46
--- cust_main.pm	21 Apr 2004 01:50:02 -0000	1.92.2.45
+++ cust_main.pm	30 Apr 2004 20:22:50 -0000	1.92.2.46
@@ -1517,7 +1517,7 @@
              || $a->weight    <=> $b->weight
              || $a->eventpart <=> $b->eventpart }
         grep { $_->seconds <= ( $invoice_time - $cust_bill->_date )
-               && ! qsearchs( 'cust_bill_event', {
+               && ! qsearch( 'cust_bill_event', {
                                 'invnum'    => $cust_bill->invnum,
                                 'eventpart' => $_->eventpart,
                                 'status'    => 'done',