[Koha-patches] [PATCH] MT6196: strange order in CSV upload

paul.poulain at biblibre.com paul.poulain at biblibre.com
Fri Apr 29 19:37:35 CEST 2011


From: Paul Poulain <paul.poulain at biblibre.com>

uploading the circ overdues result in a csv with columns in a strange order
and not the order of the screen
This patch reorder the column by putting the usefull ones first
---
 circ/overdue.pl |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/circ/overdue.pl b/circ/overdue.pl
index abeb0c6..25bc336 100755
--- a/circ/overdue.pl
+++ b/circ/overdue.pl
@@ -404,7 +404,8 @@ sub build_csv {
     my @lines = ();
 
     # build header ...
-    my @keys = grep { $_ ne 'patron_attr_value_loop' } sort keys %{ $overdues->[0] };
+    my @keys = qw /duedate title author borrowertitle name phone barcode email address address2 zipcode city country
+                branchcode itemcallnumber biblionumber borrowernumber itemnum replacementprice streetnumber streettype/;
     my $csv = Text::CSV_XS->new();
     $csv->combine(@keys);
     push @lines, $csv->string();
-- 
1.7.1



More information about the Koha-patches mailing list