Changeset 266 for trunk/lib/Epoll/Controller

Timestamp:

12/10/09 09:29:20 (15 years ago)

Author:

nanardon

Message:

• review validation page, fixing #12

File:

• trunk/lib/Epoll/Controller/Admin.pm (modified) (3 diffs)

trunk/lib/Epoll/Controller/Admin.pm

@@ -129 +129 @@
             );
         }
-        foreach my $bid ($poll->list_ballot_needvalid) {
+        foreach my $bid ($c->req->param('bsubvalid')) {
             if (!$c->req->param($bid)) {
                 next;
@@ -156 +156 @@
 }
 
+sub ballotfilter : Private {
+    my ($self, $c) = @_;
+
+    my $poll = $c->model('Vote')->poll($c->stash->{voteid});
+    $c->req->params->{ballotvalue} = 's:needvalid'
+        if (!$c->req->param('ballotvalue'));
+
+    for ($c->req->param('ballotvalue') || '') {
+        /^v:(.*)/ and $c->stash->{ballotfilter} =
+            [ $poll->ballot_by_value($1) ];
+        /^s:invalid$/ and $c->stash->{ballotfilter} =
+            [ $poll->list_ballot_invalid ];
+        /^s:valid$/ and $c->stash->{ballotfilter} =
+            [ $poll->list_ballot_valid ];
+        /^s:needvalid$/ and $c->stash->{ballotfilter} =
+            [ $poll->list_ballot_needvalid ];
+    }
+}
+
 sub auth : Private {
     my ($self, $c) = @_;
@@ -259 +278 @@
 
     $c->forward('auth') or return;
+    $c->forward('modify_poll');
     $c->stash->{page}{title} = $poll->info('label') . ': Administration: Validation';
+
+    $c->forward('ballotfilter');
 }