projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
eliminate harmless "Use of uninitialized value $enc in string eq" warnings
[freeside.git]
/
FS
/
FS
/
cust_bill_pkg_detail.pm
diff --git
a/FS/FS/cust_bill_pkg_detail.pm
b/FS/FS/cust_bill_pkg_detail.pm
index
f2e60d2
..
4d9ee81
100644
(file)
--- 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;
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' ) {