[freeside-commits] freeside/FS/FS Upgrade.pm,1.12,1.13

[Ivan,,,]

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

Modified Files:
	Upgrade.pm 
Log Message:
start of better error reporting for RADIUS upgrade errors

Index: Upgrade.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Upgrade.pm,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- Upgrade.pm	10 Jun 2008 23:24:16 -0000	1.12
+++ Upgrade.pm	10 Jun 2008 23:26:14 -0000	1.13
@@ -141,7 +141,7 @@
         $sth_update->execute or die $errmsg.$sth_update->errstr;
       } else {
         my $error = $sth_alter->errstr;
-        warn $errmsg.$error; #unless $error =~ /exists/i;
+        warn $errmsg.$error unless $error =~ /Duplicate column name/i;
       }
     } else {
       my $error = $dbh->errstr;