[freeside-commits] freeside/FS/FS Record.pm,1.120,1.121

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail:/tmp/cvs-serv3495

Modified Files:
	Record.pm 
Log Message:
foiled by autovivification!

Index: Record.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Record.pm,v
retrieving revision 1.120
retrieving revision 1.121
diff -u -d -r1.120 -r1.121
--- Record.pm	25 Aug 2006 19:30:52 -0000	1.120
+++ Record.pm	26 Aug 2006 02:12:54 -0000	1.121
@@ -388,7 +388,9 @@
   my %result;
   tie %result, "Tie::IxHash";
   my @stuff = @{ $sth->fetchall_arrayref( {} ) };
-  if ( $pkey && $stuff[0]->{$pkey} ) {
+  #if ( $pkey ) {
+  #if ( $pkey && $stuff[0]->{$pkey} ) {
+  if ( $pkey && scalar(@stuff) && $stuff[0]->{$pkey} ) {
     %result = map { $_->{$pkey}, $_ } @stuff;
   } else {
     @result{@stuff} = @stuff;