oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

added direct value access in DataForm list view

Browse source
This commit is contained in:
Doug Bell 2009-09-15 20:16:31 -05:00
parent e161afd5c0
commit ed8a0dac5c
5 changed files with 201 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/WebGUI/Asset/Wobject/DataForm.pm
View file

@ -713,9 +713,11 @@ sub getListTemplateVars {
while ( my $entry = $entryIter->() ) {
my $entryData = $entry->fields;
my @dataLoop;
my %dataVars;
for my $fieldName ( @{ $self->getFieldOrder } ) {
my $field = $fieldConfig->{$fieldName};
my $form = $self->_createForm($field, $entryData->{$fieldName});
$dataVars{ 'record.noloop.' . $fieldName } = $entryData->{$fieldName};
push @dataLoop, {
"record.data.name" => $field->{name},
"record.data.label" => $field->{label},
@ -725,6 +727,7 @@ sub getListTemplateVars {
};
}
push @recordLoop, {
%dataVars,
"record.ipAddress" => $entry->ipAddress,
"record.edit.url" => $self->getFormUrl("func=view;entryId=".$entry->getId),
"record.edit.icon" => $self->session->icon->edit("func=view;entryId=".$entry->getId, $self->get('url')),