[svn:p5ee] r13459 - p5ee/trunk/App-Repository/lib/App

Author: spadkins
Date: Fri Oct 30 06:06:42 2009
New Revision: 13459

Modified:
   p5ee/trunk/App-Repository/lib/App/Repository.pm

Log:
allow rows_to_hashes() to have some columns which are null which are not translated to the hash

Modified: p5ee/trunk/App-Repository/lib/App/Repository.pm
==============================================================================
--- p5ee/trunk/App-Repository/lib/App/Repository.pm	(original)
+++ p5ee/trunk/App-Repository/lib/App/Repository.pm	Fri Oct 30 06:06:42 2009
@@ -1305,6 +1305,7 @@
             $hash = {};
             for (my $idx = 0; $idx <= $#$cols; $idx++) {
                 $col = $cols->[$idx];
+                next if (!$col);
                 $value = $row->[$idx];
                 $hash->{$col} = $value;
             }