[svn:p5ee] r11053 - p5ee/trunk/App-Repository/lib/App/ValueDomain

Author: spadkins
Date: Fri Apr  4 07:29:09 2008
New Revision: 11053

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

Log:
support get_table_def() instead of using the rep->{table}{<table>}
shortcut

Modified:
p5ee/trunk/App-Repository/lib/App/ValueDomain/RepositoryTableColumns.pm
==============================================================================
---
p5ee/trunk/App-Repository/lib/App/ValueDomain/RepositoryTableColumns.pm	(original)
+++
p5ee/trunk/App-Repository/lib/App/ValueDomain/RepositoryTableColumns.pm	Fri
Apr  4 07:29:09 2008
@[EMAIL PROTECTED]
 -75,9 +75,10 @[EMAIL PROTECTED]
     my $context = $self->{context};
     my $rep = $context->repository($self->{repository});
     my $table = $self->{table} || die "No table specified in
$self->{name} ValueDomain";
+    my $table_def = $rep->get_table_def($table);
     my $values = $rep->get_column_names($table);
     my $labels = $rep->get_column_labels($table, $self->{labelcolumn});
-    my $column_defs = $rep->{table}{$table}{column};
+    my $column_defs = $table_def->{column};
     $values = [ @[EMAIL PROTECTED]
 ];    # make a copy
     $labels = { %$labels };    # make a copy
     if ($self->{sortcolumn}) {