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

(-)a/reports/guided_reports.pl (-9 / +1 lines)
Lines 912-925 elsif ($phase eq 'Save Compound'){ Link Here
912
# pass $sth, get back an array of names for the column headers
912
# pass $sth, get back an array of names for the column headers
913
sub header_cell_values {
913
sub header_cell_values {
914
    my $sth = shift or return ();
914
    my $sth = shift or return ();
915
    my @cols;
915
    return @{$sth->{NAME}};
916
    foreach my $c (@{$sth->{NAME}}) {
917
        # TODO in Bug 11944
918
        #FIXME apparently DBI still needs a utf8 fix for this?
919
        $c = Encode::decode('UTF-8', $c);
920
        push @cols, $c;
921
    }
922
    return @cols;
923
}
916
}
924
917
925
# pass $sth, get back a TMPL_LOOP-able set of names for the column headers
918
# pass $sth, get back a TMPL_LOOP-able set of names for the column headers
926
- 

Return to bug 11944