Changeset 78 for trunk/lib

Timestamp:

03/18/09 23:39:12 (15 years ago)

Author:

nanardon

Message:

• fix csv format, is now 'mail;nom'

File:

• trunk/lib/Vote/Model/Vote.pm (modified) (1 diff)

trunk/lib/Vote/Model/Vote.pm

@@ -725 +725 @@
         chomp($line);
         warn $line;
-        my ($id, $mail) = split(';', $line);
-        $id && $mail or do {
+        my ($mail, $name) = split(';', $line);
+        $mail or do {
             $self->db->rollback;
             return;
         };
-        $self->addupd_voting($voteid, $id, $mail);
+        $self->addupd_voting($voteid, $mail, $name);
     }
     1;