Patches to Freeside 1.5.7 for successful use of older DBI::Pg
[freeside.git] / install / rpm / freeside-1.5.7.dbd-pg.patch
1 diff -Naur freeside-1.5.7.orig/FS/FS/Record.pm freeside-1.5.7/FS/FS/Record.pm
2 --- freeside-1.5.7.orig/FS/FS/Record.pm 2005-05-04 05:20:34.000000000 -0400
3 +++ freeside-1.5.7/FS/FS/Record.pm      2005-07-26 14:10:31.000000000 -0400
4 @@ -337,9 +337,9 @@
5      if ( $record->{$field} =~ /^\d+(\.\d+)?$/
6           && $dbdef->table($table)->column($field)->type =~ /(int|serial)/i
7      ) {
8 -      $sth->bind_param($bind++, $record->{$field}, { TYPE => SQL_INTEGER } );
9 +      $sth->bind_param($bind++, $record->{$field}, SQL_INTEGER );
10      } else {
11 -      $sth->bind_param($bind++, $record->{$field}, { TYPE => SQL_VARCHAR } );
12 +      $sth->bind_param($bind++, $record->{$field}, SQL_VARCHAR );
13      }
14    }
15