summaryrefslogtreecommitdiff
path: root/GroLUG/lib
diff options
context:
space:
mode:
Diffstat (limited to 'GroLUG/lib')
-rw-r--r--GroLUG/lib/GroLUG/C/Iscritti.pm2
-rw-r--r--GroLUG/lib/GroLUG/LogAppender.pm10
2 files changed, 12 insertions, 0 deletions
diff --git a/GroLUG/lib/GroLUG/C/Iscritti.pm b/GroLUG/lib/GroLUG/C/Iscritti.pm
index 61ac283..ee6ee0c 100644
--- a/GroLUG/lib/GroLUG/C/Iscritti.pm
+++ b/GroLUG/lib/GroLUG/C/Iscritti.pm
@@ -25,6 +25,8 @@ sub index :Private {
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';
diff --git a/GroLUG/lib/GroLUG/LogAppender.pm b/GroLUG/lib/GroLUG/LogAppender.pm
new file mode 100644
index 0000000..81723ef
--- /dev/null
+++ b/GroLUG/lib/GroLUG/LogAppender.pm
@@ -0,0 +1,10 @@
+package GroLUG::LogAppender;
+use base 'Log::Log4perl::Appender::DBI';
+
+sub _init {
+ my ($self)=@_;
+
+ $self->{dbh}=GroLUG::M::DB->storage->dbh;
+}
+
+1;