View | Details | Raw Unified | Return to bug 37987
Collapse All | Expand All

(-)a/reports/guided_reports.pl (-3 / +1 lines)
Lines 639-646 elsif ($op eq 'export'){ Link Here
639
            $content .= join("\t", header_cell_values($sth)) . "\n";
639
            $content .= join("\t", header_cell_values($sth)) . "\n";
640
            $content = $scrubber->scrub( Encode::decode( 'UTF-8', $content ) );
640
            $content = $scrubber->scrub( Encode::decode( 'UTF-8', $content ) );
641
            while ( my $row = $sth->fetchrow_arrayref() ) {
641
            while ( my $row = $sth->fetchrow_arrayref() ) {
642
                $content .= join( "\t", map { $_ // '' } @$row ) . "\n";
642
                $content .= $scrubber->scrub( join( "\t", map { $_ // '' } @$row ) ) . "\n";
643
                $content = $scrubber->scrub( $content );
644
            }
643
            }
645
        } else {
644
        } else {
646
            if ( $format eq 'csv' ) {
645
            if ( $format eq 'csv' ) {
647
- 

Return to bug 37987