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

(-)a/misc/cronjobs/overdue_notices.pl (-1 / +1 lines)
Lines 330-335 our $csv; # the Text::CSV_XS object Link Here
330
our $csv_fh;    # the filehandle to the CSV file.
330
our $csv_fh;    # the filehandle to the CSV file.
331
if ( defined $csvfilename ) {
331
if ( defined $csvfilename ) {
332
    my $sep_char = C4::Context->preference('delimiter') || ',';
332
    my $sep_char = C4::Context->preference('delimiter') || ',';
333
    $sep_char = "\t" if ($sep_char eq 'tabulation');
333
    $csv = Text::CSV_XS->new( { binary => 1 , sep_char => $sep_char } );
334
    $csv = Text::CSV_XS->new( { binary => 1 , sep_char => $sep_char } );
334
    if ( $csvfilename eq '' ) {
335
    if ( $csvfilename eq '' ) {
335
        $csv_fh = *STDOUT;
336
        $csv_fh = *STDOUT;
336
- 

Return to bug 7251