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

[spadkins]

Author: spadkins
Date: Fri Mar 12 07:32:44 2010
New Revision: 13841

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

Log:
clarify the condition to check for an on-disk metadata file

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 Mar 12 07:32:44 2010
@@ -4230,7 +4230,8 @@
     my ($table_def, $columns, $column, $column_def, $idx, $native_column);
 
     $table_def = $self->{table}{$table} || {};
-    if (!%$table_def) {
+    # print STDERR "_load_table_metadata($table}: table_def=[$table_def] {", 
join("|", %$table_def), "}\n";
+    if (!$table_def->{column}) {   # no columns are defined
         my $context = $self->{context};
         my $options = $context->{options};
         my $prefix = $options->{prefix};