fix cust_bill_pkg_detail throwing a fatal error w/MySQL
authorivan <ivan>
Sat, 27 Mar 2010 06:21:53 +0000 (06:21 +0000)
committerivan <ivan>
Sat, 27 Mar 2010 06:21:53 +0000 (06:21 +0000)
FS/FS/cust_bill_pkg_detail.pm

index f2e60d2..4d9ee81 100644 (file)
@@ -241,8 +241,8 @@ sub _upgrade_data { # class method
 
   warn "$me upgrading $class\n" if $DEBUG;
 
 
   warn "$me upgrading $class\n" if $DEBUG;
 
-  my $columndef = dbdef->table($class->table)->column('classnum');
-  unless ($columndef->type eq 'int4') {
+  my $type = dbdef->table($class->table)->column('classnum')->type;
+  unless ( $type =~ /^int/i || $type =~ /int$/i ) {
 
     my $dbh = dbh;
     if ( $dbh->{Driver}->{Name} eq 'Pg' ) {
 
     my $dbh = dbh;
     if ( $dbh->{Driver}->{Name} eq 'Pg' ) {