1 files changed, 43 insertions, 0 deletions
diff --git a/GroLUG/lib/GroLUG/C/Iscritto.pm b/GroLUG/lib/GroLUG/C/Iscritto.pm
new file mode 100644
index 0000000..513e6ac
--- /dev/null
+++ b/GroLUG/lib/GroLUG/C/Iscritto.pm
@@ -0,0 +1,43 @@
+package GroLUG::C::Iscritti;
+
+use strict;
+use warnings;
+use base 'Catalyst::Controller';
+
+sub login :Global {
+    my ( $self, $c ) = @_;
+
+    if ($c->login) {
+        $c->res->redirect($c->uri_for('/iscritti'));
+    }
+    else {
+        $c->stash->{template}='login.tt2';
+    }
+}
+
+sub logout :Global {
+    my ( $self, $c ) = @_;
+
+    $c->logout();
+
+    $c->res->redirect($c->uri_for('/'));
+}
+
+sub index :Private {
+    my ( $self, $c ) = @_;
+
+    $c->stash->{iscritti}=GroLUG::M::DB->resultset('Iscritto')->search({attivo=>1});
+    $c->stash->{template}='lista-iscritti.tt2';
+}
+
+sub iscritto :Global {
+    my ($self,$c,$id)=@_;
+
+    $c->log->info($c->user->id,"scheda iscritto $id");
+
+    $c->stash->{iscritto}=GroLUG::M::DB->resultset('Iscritto')->find($id);
+
+    $c->stash->{template}='scheda-iscritto.tt2';
+}
+
+1;