[freeside-commits] freeside/FS/FS Record.pm,1.228,1.229

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv27262

Modified Files:
	Record.pm 
Log Message:
fix DBI binding for negative integers, shoudl fix CCH update, RT#14243

Index: Record.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Record.pm,v
retrieving revision 1.228
retrieving revision 1.229
diff -u -w -d -r1.228 -r1.229
--- Record.pm	12 Aug 2011 21:31:25 -0000	1.228
+++ Record.pm	29 Sep 2011 05:53:55 -0000	1.229
@@ -274,7 +274,7 @@
 
   my $bind_type = { TYPE => SQL_VARCHAR };
 
-  if ( $type =~ /(big)?(int|serial)/i && $value =~ /^\d+(\.\d+)?$/ ) {
+  if ( $type =~ /(big)?(int|serial)/i && $value =~ /^-?\d+(\.\d+)?$/ ) {
 
     $bind_type = { TYPE => SQL_INTEGER };