diff options
author | dakkar <dakkar@luxion> | 2006-02-12 17:05:10 +0000 |
---|---|---|
committer | dakkar <dakkar@luxion> | 2006-02-12 17:05:10 +0000 |
commit | a156daaa7cb3234ce878d5dc3dc0761f2cbf6a1e (patch) | |
tree | 6b72faa18ba500cffa6faed7052f197a99fe4934 /GroLUG/lib/GroLUG/C/Iscritto.pm | |
parent | r1307@host183-17: dakkar | 2006-02-10 11:34:33 +0100 (diff) | |
download | IscrittiGroLUG-a156daaa7cb3234ce878d5dc3dc0761f2cbf6a1e.tar.gz IscrittiGroLUG-a156daaa7cb3234ce878d5dc3dc0761f2cbf6a1e.tar.bz2 IscrittiGroLUG-a156daaa7cb3234ce878d5dc3dc0761f2cbf6a1e.zip |
r1314@narval: dakkar | 2006-02-10 19:50:50 +0100
bugfix: ora trova il file degli utenti, qualunque sia CWD
bugfix: un utente non loggato viene sempre redirected a /login
git-svn-id: svn://luxion/repos/IscrittiGroLUG/trunk@182 fcb26f47-9200-0410-b104-b98ab5b095f3
Diffstat (limited to 'GroLUG/lib/GroLUG/C/Iscritto.pm')
-rw-r--r-- | GroLUG/lib/GroLUG/C/Iscritto.pm | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/GroLUG/lib/GroLUG/C/Iscritto.pm b/GroLUG/lib/GroLUG/C/Iscritto.pm index 3e733ca..f3b9975 100644 --- a/GroLUG/lib/GroLUG/C/Iscritto.pm +++ b/GroLUG/lib/GroLUG/C/Iscritto.pm @@ -5,6 +5,16 @@ use warnings; use base 'Catalyst::Controller'; use DateTime; +sub auto :Private { + my ( $self, $c ) = @_; + + unless ($c->user_exists) { + $c->res->redirect($c->uri_for('/login')); + return; + } + return 1; +} + sub iscritti :Global { my ( $self, $c ) = @_; |