'm2name_table' => 'table_name',
'm2name_namecol' => 'name_column',
#OR#
- 'm2m_table' =>
- 'm2m_target_table' =>
- 'm2m_srccol' => #opt, if not the same as this table
- 'm2m_dstcol' => #opt, if not the same as target table
+ 'm2m_method' =>
+ #'m2m_srccol' => #opt, if not the same as this table
+ 'm2m_dstcol' => #required for now, eventuaully opt, if not the same as target table
'm2_label' => 'Label', #
'm2_new_default' => \@table_name_objects, #default
'agent_null_right' => 'Access Right Name',
#run when re-displaying with an error
- 'error_callback' => sub { my( $cgi, $object, $fields_listref ) = @_; },
+ 'error_callback' => sub { my( $cgi, $object, $fields_listref, $opt_hashref ) = @_; },
#run when editing
'edit_callback' => sub { my( $cgi, $object, $fields_listref ) = @_; },
'new_callback' => sub { my( $cgi, $object, $fields_listref ) = @_; },
#run before display to return a different value
- 'value_callback' => sub { my( $columname, $value } ) = @_; },
+ 'value_callback' => sub { my( $columname, $value ) = @_; },
#XXX describe
'field_callback' => sub { },
% $layer_values = &{ $f->{'layer_values_callback'} }( $cgi, $object )
% if $f->{'layer_values_callback'}
% && ! $f->{'m2name_table'}
-% && ! $f->{'m2m_table'};
+% && ! $f->{'m2m_method'};
%
% warn "layer values: ". Dumper($layer_values)
% if $opt{'debug'};
% #select(-*)
% 'options' => $f->{'options'},
% 'labels' => $f->{'labels'},
+% 'empty_label' => $f->{'empty_label'},
% 'multiple' => $f->{'multiple'},
% 'disable_empty' => $f->{'disable_empty'},
% #select-reason
%
% my $fieldnum = '';
% my $curr_value = '';
-% if ( $f->{'m2name_table'} || $f->{'m2m_table'} ) { #XXX test this for all
+% if ( $f->{'m2name_table'} || $f->{'m2m_method'} ) { #XXX test this for all
% #types of fields
% my($table, $col);
% if ( $f->{'m2name_table'} ) {
% $table = $f->{'m2name_table'};
% $col = $f->{'m2name_namecol'};
-% } elsif ( $f->{'m2m_table'} ) {
-% $table = $f->{'m2m_table'}; #XXX method name
-% $col = $f->{'m2m_dstcol'}; #XXX or get it from schema, defualt to
-% #same name as primary key of
-% #m2m_target_table
+% } elsif ( $f->{'m2m_method'} ) {
+% $table = $f->{'m2m_method'};
+% $col = $f->{'m2m_dstcol'};
% }
% $fieldnum = 0;
% $layer_prefix_on = 1;
<% include( @include ) %>
-% if ( $f->{'m2name_table'} || $f->{'m2m_table'} ) {
+% if ( $f->{'m2name_table'} || $f->{'m2m_method'} ) {
<SCRIPT TYPE="text/javascript">
map { $_ => scalar($cgi->param($_)) } fields($table)
});
- &{$opt{'error_callback'}}($cgi, $object, $fields)
+ &{$opt{'error_callback'}}($cgi, $object, $fields, \%opt )
if $opt{'error_callback'};
} elsif ( $cgi->keywords || $cgi->param($pkey) ) { #editing