diff options
| -rw-r--r-- | FS/FS/cust_bill_pkg_detail.pm | 4 | 
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/cust_bill_pkg_detail.pm b/FS/FS/cust_bill_pkg_detail.pm index f2e60d2f4..4d9ee8191 100644 --- a/FS/FS/cust_bill_pkg_detail.pm +++ b/FS/FS/cust_bill_pkg_detail.pm @@ -241,8 +241,8 @@ sub _upgrade_data { # class method    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' ) {  | 
