Add the column headers back to the CSV file exported from a Thing. Fixes bug #12062.

This commit is contained in:
Colin Kuskie 2011-02-28 19:23:56 -08:00
parent 99f613bb9a
commit 7091cedc0a
2 changed files with 3 additions and 1 deletions

View file

@ -2,6 +2,7 @@
- fixed #12057: WebGUI::Search, assetIds search clause
- fixed #12051: Prevent Proxy Caching Breaks Edit/Add Thing
- fixed #12053: Thingy: View Thing Data
- fixed #12062: Thingy: column headers missing from exported file
7.10.10
- fixed #12035: Story Manager - make keywords from Story view work

View file

@ -2745,9 +2745,10 @@ sub www_export {
### Loop through the returned structure and put it through Text::CSV
# Column heads
$self->session->log->warn("field labels: ". join ' ', @fieldLabels);
my $csv_filename = 'export_'.$thingProperties->{label}.'.csv';
$tempStorage->addFileFromScalar($csv_filename, WebGUI::Text::joinCSV(@fieldLabels));
open my $CSV, '>', $tempStorage->getPath($csv_filename);
print $CSV WebGUI::Text::joinCSV( @fieldLabels );
# Data lines
$pb->update($i18n->get('Writing data'));