[freeside-commits] freeside/FS/FS Record.pm,1.196.2.7,1.196.2.8

Ivan,,, ivan at wavetail.420.am
Wed Aug 4 11:50:13 PDT 2010


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

Modified Files:
      Tag: FREESIDE_1_9_BRANCH
	Record.pm 
Log Message:
fix scalar_sql not to return empty string for zero

Index: Record.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Record.pm,v
retrieving revision 1.196.2.7
retrieving revision 1.196.2.8
diff -u -w -d -r1.196.2.7 -r1.196.2.8
--- Record.pm	16 Jul 2010 23:46:38 -0000	1.196.2.7
+++ Record.pm	4 Aug 2010 18:50:11 -0000	1.196.2.8
@@ -2807,7 +2807,8 @@
   my $sth = dbh->prepare($sql) or die dbh->errstr;
   $sth->execute
     or die "Unexpected error executing statement $sql: ". $sth->errstr;
-  $sth->fetchrow_arrayref->[0] || '';
+  my $scalar = $sth->fetchrow_arrayref->[0];
+  defined($scalar) ? $scalar : '';
 }
 
 =back



More information about the freeside-commits mailing list