Changeset 167 for trunk/lib

Timestamp:

04/06/09 18:45:41 (15 years ago)

Author:

nanardon

Message:

• split voting admin page in subsection

File:

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

trunk/lib/Vote/Controller/Admin.pm

@@ -23 +23 @@
 
 sub begin : Private {
-    my ( $self, $c ) = @_;
+    my ( $self, $c, @args ) = @_;
     $c->model('Vote')->db->rollback;
+
+    warn join('-', @args);
 }
 
@@ -33 +35 @@
 }
 
-sub default : Private {
-    my ( $self, $c, undef, $id ) = @_;
-    $c->stash->{voteid} = $id;
+sub modify_poll : Private {
+    my ( $self, $c) = @_;
+    my $id = $c->stash->{voteid};
+
     my $vote = $c->model('Vote');
-
-    $vote->vote_info($id) or do {
-        $c->res->redirect($c->uri_for('/'));
-        return;
-    };
-
-    my $password = $c->session->{vpassword} || $c->req->param('vpassword');
-
-    if (!$c->model('Vote')->auth_poll($id, $password)) {
-        $c->stash->{page}{title} = $vote->vote_info($id)->{label} . ': Login d\'administration';
-        $c->session->{vpassword} = undef;
-        $c->stash->{template} = 'admin/login.tt';
-        return;
-    }
-
-    $c->session->{vpassword} = $password;
-
-    $c->stash->{page}{title} = $c->model('Vote')->vote_info($id)->{label} . ': Administration';
-
     for ($vote->vote_status($id) || '') {
     /^BEFORE$/ and do {
@@ -124 +108 @@
     };
     }
+}
 
+sub auth : Private {
+    my ($self, $c) = @_;
+    my $vote = $c->model('Vote');
+    my $password = $c->session->{vpassword} || $c->req->param('vpassword');
+
+    if (!$c->model('Vote')->auth_poll($c->stash->{voteid}, $password)) {
+        $c->stash->{page}{title} = $vote->vote_info(
+            $c->stash->{voteid}
+        )->{label} . ': Login d\'administration';
+        $c->session->{vpassword} = undef;
+        $c->stash->{template} = 'admin/login.tt';
+        return;
+    }
+    $c->session->{vpassword} = $password;
+    return 1;
+}
+
+sub default : Private {
+    my ( $self, $c, undef, $id ) = @_;
+    $c->stash->{voteid} = $id;
+    my $vote = $c->model('Vote');
+
+    $vote->vote_info($id) or do {
+        $c->res->redirect($c->uri_for('/'));
+        return;
+    };
+
+    $c->forward('auth') or return;
+    $c->forward('modify_poll');
+    $c->stash->{page}{title} = $c->model('Vote')->vote_info($id)->{label} . ': Administration';
+
+
+}
+
+sub voting: LocalRegex('^(\d+)/voting$') {
+    my ($self, $c, $id, @sub) = @_;
+    ($c->stash->{voteid}) = @{ $c->req->snippets || [] };
+    my $vote = $c->model('Vote');
+
+    $vote->vote_info($id) or do {
+        $c->res->redirect($c->uri_for('/'));
+        return;
+    };
+
+    $c->forward('auth') or return;
+    $c->forward('modify_poll');
+    $c->stash->{page}{title} = $c->model('Vote')->vote_info($id)->{label} . ': Administration';
 }