Changeset 17 for trunk/lib

Timestamp:

03/07/09 18:44:50 (15 years ago)

Author:

nanardon

Message:

• check count of selected items

File:

• trunk/lib/Vote/Controller/Ballot.pm (modified) (2 diffs)

trunk/lib/Vote/Controller/Ballot.pm

@@ -59 +59 @@
     $c->stash->{choices} = { %choices };
     $c->stash->{sbal} = { map { $_ => 1 } $c->req->param('sbal') };
+    $c->stash->{fsbal} = [ map {
+        s/^\s+//;
+        s/\s+$//;
+        s/\s+/ /g;
+        $_
+    } ($c->req->param('fsbal')) ];
+
+    my @torecord = grep { $_ } (
+        (map { $choices{$_} } $c->req->param('sbal')),
+        @{ $c->stash->{fsbal} }
+    );
+    
+    warn $vote->vote_info($id)->{choice_count};
+    warn scalar(@torecord);
+    warn $_ foreach(@torecord);
+    if (scalar(@torecord) > $vote->vote_info($id)->{choice_count}) {
+        $c->req->param('ballot', '');
+        $c->stash->{vote_error} = 'Seulement ' .
+            $vote->vote_info($id)->{choice_count} . ' choix possible';
+        return;
+    }
 
     if ($c->req->param('confirm')) {
@@ -64 +85 @@
             $uid,
             $id,
-            [ grep { $_ } (
-              map { $choices{$_} } $c->req->param('sbal'),
-              $c->req->param('fsbal'),
-            ) ],
+            [ @torecord ],
             $c->req->address,
         ); # TODO trap error