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

If exportMetaData is set to false, do not print out the column lables OR values. Fixes bug #11925.

Browse source
This commit is contained in:
Colin Kuskie 2010-10-25 10:52:27 -07:00
parent cb952501fc
commit 4f95507485
2 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

1
docs/changelog/7.x.x.txt
View file

@ -3,6 +3,7 @@
- fixed #11921: DataForm emails contain 1 table per field - fixed #11921: DataForm emails contain 1 table per field
- fixed #11922: Help tempalte is squatting on a good URL - fixed #11922: Help tempalte is squatting on a good URL
- fixed #11923: Collaboration System Mail Cron Errors - fixed #11923: Collaboration System Mail Cron Errors
- fixed #11925: Some problems in Thingy export (metaData values in CSV export)
7.10.3 7.10.3
- fixed #11903: Unnecessary debug in Thingy - fixed #11903: Unnecessary debug in Thingy

10
lib/WebGUI/Asset/Wobject/Thingy.pm
View file

@ -2718,12 +2718,12 @@ sub www_export {
my $value = $self->getFieldValue($data->{"field_".$fieldId},$field->{properties},"%y-%m-%d","%y-%m-%d %j:%n:%s"); my $value = $self->getFieldValue($data->{"field_".$fieldId},$field->{properties},"%y-%m-%d","%y-%m-%d %j:%n:%s");
push(@fieldValues, $value); push(@fieldValues, $value);
} }
foreach my $metaDataField (@metaDataFields){ if ($thingProperties->{exportMetaData}) {
push(@fieldValues,$data->{$metaDataField}); foreach my $metaDataField (@metaDataFields){
push(@fieldValues,$data->{$metaDataField});
}
} }
$out .= "\n".WebGUI::Text::joinCSV( $out .= "\n".WebGUI::Text::joinCSV( @fieldValues );
@fieldValues
);
} }
$fileName = "export_".$thingProperties->{label}.".csv"; $fileName = "export_".$thingProperties->{label}.".csv";