Changeset 1991 for trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web

Timestamp:

04/27/17 00:47:33 (7 years ago)

Author:

nanardon

Message:

Use hash for loadCSV options to allow more parameters

File:

• trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Tools/CSV.pm (modified) (2 diffs)

trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Tools/CSV.pm

@@ -42 +42 @@
     loadCSV(
         $upload->fh,
-        sub {
+        cb => sub {
             my ($res, $count) = @_;
 
@@ -75 +75 @@
             return 1;
         },
-        sub {
+        initcb => sub {
             my ($csv) = @_;
             @{ $c->stash->{attrs} } = $csv->column_names;