From a9cb617078162fddb1e2926102124d332772e203 Mon Sep 17 00:00:00 2001 From: dakkar Date: Mon, 13 Feb 2006 17:01:16 +0000 Subject: preparato per il deploy git-svn-id: svn://luxion/repos/IscrittiGroLUG/trunk@193 fcb26f47-9200-0410-b104-b98ab5b095f3 --- GroLUG/grolug.yml | 3 +-- GroLUG/lib/GroLUG.pm | 1 - GroLUG/lib/GroLUG/C/Iscritto.pm | 12 +++++++++--- GroLUG/logger.conf | 4 ++-- GroLUG/usersfile | 1 + 5 files changed, 13 insertions(+), 8 deletions(-) (limited to 'GroLUG') diff --git a/GroLUG/grolug.yml b/GroLUG/grolug.yml index 96ff9ec..f221acc 100644 --- a/GroLUG/grolug.yml +++ b/GroLUG/grolug.yml @@ -1,8 +1,7 @@ --- name: GroLUG view: GroLUG::V::TT -stacktrace: - verbose: 1 +using_frontend_proxy: 1 session: expires: 3600 dbi_dbh: 'GroLUG::M::DB' diff --git a/GroLUG/lib/GroLUG.pm b/GroLUG/lib/GroLUG.pm index 3f26f8c..f7c7751 100644 --- a/GroLUG/lib/GroLUG.pm +++ b/GroLUG/lib/GroLUG.pm @@ -3,7 +3,6 @@ use strict; use warnings; use Catalyst qw{ - -Debug StackTrace ConfigLoader Static::Simple DefaultEnd Session Session::Store::DBI Session::State::Cookie Authentication Authentication::Store::Htpasswd Authentication::Credential::Password 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; } diff --git a/GroLUG/logger.conf b/GroLUG/logger.conf index 2852b05..12b1682 100644 --- a/GroLUG/logger.conf +++ b/GroLUG/logger.conf @@ -1,5 +1,5 @@ -log4perl.rootLogger = DEBUG, ConsoleAppender -log4perl.logger.GroLUG.C.Iscritti = INFO, DBIAppender +log4perl.rootLogger = ERROR, ConsoleAppender +log4perl.logger.GroLUG.C.Iscritto = INFO, DBIAppender log4perl.appender.ConsoleAppender = Log::Log4perl::Appender::Screen log4perl.appender.ConsoleAppender.stderr = 1 diff --git a/GroLUG/usersfile b/GroLUG/usersfile index 1f4f26e..eaa0240 100644 --- a/GroLUG/usersfile +++ b/GroLUG/usersfile @@ -1 +1,2 @@ dakkar:{SHA}qUqP5cyxm6YcTAhz05Hph5gvu9M=:admin +luca:bxaqphEOOw8q. -- cgit v1.2.3