diff options
author | dakkar <dakkar@luxion> | 2006-02-13 17:01:16 +0000 |
---|---|---|
committer | dakkar <dakkar@luxion> | 2006-02-13 17:01:16 +0000 |
commit | a9cb617078162fddb1e2926102124d332772e203 (patch) | |
tree | f68fcc799481e889a69fdbd2068d264f4c475047 /GroLUG/lib/GroLUG/C/Iscritto.pm | |
parent | cerchiamo di far andare la cosa con PAR, ma si perde un bel po' di dipendenze (diff) | |
download | IscrittiGroLUG-a9cb617078162fddb1e2926102124d332772e203.tar.gz IscrittiGroLUG-a9cb617078162fddb1e2926102124d332772e203.tar.bz2 IscrittiGroLUG-a9cb617078162fddb1e2926102124d332772e203.zip |
preparato per il deploy
git-svn-id: svn://luxion/repos/IscrittiGroLUG/trunk@193 fcb26f47-9200-0410-b104-b98ab5b095f3
Diffstat (limited to 'GroLUG/lib/GroLUG/C/Iscritto.pm')
-rw-r--r-- | GroLUG/lib/GroLUG/C/Iscritto.pm | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/GroLUG/lib/GroLUG/C/Iscritto.pm b/GroLUG/lib/GroLUG/C/Iscritto.pm index adae5dc..20cb5c2 100644 --- a/GroLUG/lib/GroLUG/C/Iscritto.pm +++ b/GroLUG/lib/GroLUG/C/Iscritto.pm @@ -64,8 +64,6 @@ sub widget_for_iscr { sub scheda :Local { my ($self,$c,$id)=@_; - $c->log->info($c->user->id,"scheda iscritto $id"); - my $iscritto=GroLUG::M::DB->resultset('Iscritto')->find($id); $c->stash->{iscritto}=$iscritto; $c->stash->{pagato}=$self->check_pagato($iscritto); @@ -107,6 +105,7 @@ sub cessa :Local { my ($self,$c,$id)=@_; my $iscritto=GroLUG::M::DB->resultset('Iscritto')->find($id); + $c->log->info($c->user->id,"cessato iscritto $id"); $iscritto->attivo(0);$iscritto->update(); $c->res->redirect($c->uri_for('scheda',$id)); @@ -116,6 +115,7 @@ sub attiva :Local { my ($self,$c,$id)=@_; my $iscritto=GroLUG::M::DB->resultset('Iscritto')->find($id); + $c->log->info($c->user->id,"riattivato iscritto $id"); $iscritto->attivo(1);$iscritto->update(); $c->res->redirect($c->uri_for('scheda',$id)); @@ -176,7 +176,7 @@ sub check_pagato { sub rinnova :Local { my ($self,$c,$id)=@_; - $c->log->info($c->user->id,"rinnovo iscritto $id"); + $c->log->info($c->user->id,"avvio rinnovo iscritto $id"); $c->stash->{iscritto}=my $iscritto=GroLUG::M::DB->resultset('Iscritto')->find($id); my $last_pag=$iscritto->pagamenti()->next(); @@ -242,6 +242,12 @@ sub cancella_pag :Local { if ($c->req->method eq 'POST') { $pagamento->delete(); + $c->log->info($c->user->id, + 'cancellato pagamento' + .($pagamento->id) + .' per iscritto ' + .($pagamento->iscritto->id)); + $c->res->redirect($c->uri_for('scheda',$iscritto->id)); return; } |