fixed: DataForm can't export fields containing newlines

This commit is contained in:
Graham Knop 2008-10-05 19:43:03 +00:00
parent d9cec8ff94
commit b002dbaf47
2 changed files with 2 additions and 1 deletions

View file

@ -1233,7 +1233,7 @@ sub www_exportTab {
if $field->{isMailField} && !$self->get('mailData');
push @exportFields, $field->{name};
}
my $tsv = Text::CSV_XS->new({sep_char => "\t", eol => "\n"});
my $tsv = Text::CSV_XS->new({sep_char => "\t", eol => "\n", binary => 1});
$tsv->combine(
'entryId',
'ipAddress',