From c6bf8a8340e6e6c5516f8f3ba54a382891a81ad9 Mon Sep 17 00:00:00 2001
From: rsiddall <rsiddall>
Date: Wed, 27 Jun 2007 18:28:37 +0000
Subject: [PATCH] Patches to Freeside 1.5.7 for successful use of older DBI::Pg

---
 install/rpm/freeside-1.5.7.dbd-pg.patch | 15 +++++++++++++++
 1 file changed, 15 insertions(+)
 create mode 100644 install/rpm/freeside-1.5.7.dbd-pg.patch

diff --git a/install/rpm/freeside-1.5.7.dbd-pg.patch b/install/rpm/freeside-1.5.7.dbd-pg.patch
new file mode 100644
index 000000000..2ec356335
--- /dev/null
+++ b/install/rpm/freeside-1.5.7.dbd-pg.patch
@@ -0,0 +1,15 @@
+diff -Naur freeside-1.5.7.orig/FS/FS/Record.pm freeside-1.5.7/FS/FS/Record.pm
+--- freeside-1.5.7.orig/FS/FS/Record.pm	2005-05-04 05:20:34.000000000 -0400
++++ freeside-1.5.7/FS/FS/Record.pm	2005-07-26 14:10:31.000000000 -0400
+@@ -337,9 +337,9 @@
+     if ( $record->{$field} =~ /^\d+(\.\d+)?$/
+          && $dbdef->table($table)->column($field)->type =~ /(int|serial)/i
+     ) {
+-      $sth->bind_param($bind++, $record->{$field}, { TYPE => SQL_INTEGER } );
++      $sth->bind_param($bind++, $record->{$field}, SQL_INTEGER );
+     } else {
+-      $sth->bind_param($bind++, $record->{$field}, { TYPE => SQL_VARCHAR } );
++      $sth->bind_param($bind++, $record->{$field}, SQL_VARCHAR );
+     }
+   }
+ 
-- 
2.20.1