[freeside-commits] freeside/FS/FS cust_credit.pm, 1.24.2.2, 1.24.2.3

[Ivan,,,]

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

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	cust_credit.pm 
Log Message:
some old databases may have 'hanging' cust_credit records; we don't want to abort the upgrade because of that, just warn

Index: cust_credit.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_credit.pm,v
retrieving revision 1.24.2.2
retrieving revision 1.24.2.3
diff -u -d -r1.24.2.2 -r1.24.2.3
--- cust_credit.pm	4 Dec 2007 18:19:05 -0000	1.24.2.2
+++ cust_credit.pm	7 Dec 2007 01:05:00 -0000	1.24.2.3
@@ -458,7 +458,8 @@
         $cust_credit->setfield('reason', '');
         my $error = $cust_credit->replace;
 
-        die "error inserting $self into database: $error\n"
+        warn "*** WARNING: error replacing reason in $self ".
+             $self->crednum. ": $error ***\n"
           if $error;
       }
     }