[Koha-patches] [biblibre-integration] (bug #3573) use delimiter syspref generating overdues csv
Henri-Damien LAURENT
henridamien.laurent at biblibre.com
Wed Sep 2 17:38:38 CEST 2009
From: Nahuel ANGELINETTI <nahuel.angelinetti at biblibre.com>
---
misc/cronjobs/overdue_notices.pl | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/misc/cronjobs/overdue_notices.pl b/misc/cronjobs/overdue_notices.pl
index 831cdfc..5e7c190 100755
--- a/misc/cronjobs/overdue_notices.pl
+++ b/misc/cronjobs/overdue_notices.pl
@@ -284,7 +284,8 @@ binmode( STDOUT, ":utf8" );
our $csv; # the Text::CSV_XS object
our $csv_fh; # the filehandle to the CSV file.
if ( defined $csvfilename ) {
- $csv = Text::CSV_XS->new( { binary => 1 } );
+ my $sep_char = C4::Context->preference('delimiter') || ',';
+ $csv = Text::CSV_XS->new( { binary => 1 , sep_char => $sep_char } );
if ( $csvfilename eq '' ) {
$csv_fh = *STDOUT;
} else {
--
1.6.0.4
More information about the Koha-patches
mailing list