diff options
Diffstat (limited to 'GroLUG/lib')
-rw-r--r-- | GroLUG/lib/Catalyst/Engine/Null.pm | 24 | ||||
-rw-r--r-- | GroLUG/lib/GroLUG/C/Iscritto.pm | 2 |
2 files changed, 14 insertions, 12 deletions
diff --git a/GroLUG/lib/Catalyst/Engine/Null.pm b/GroLUG/lib/Catalyst/Engine/Null.pm index 2b910c2..179bc32 100644 --- a/GroLUG/lib/Catalyst/Engine/Null.pm +++ b/GroLUG/lib/Catalyst/Engine/Null.pm @@ -6,16 +6,16 @@ use Catalyst::Utils; use NEXT; use URI; -sub finalize_body { print STDERR "finalize_body\n"}; -sub finalize_cookies { print STDERR "finalize_cookies\n"}; -sub finalize_error { print STDERR "finalize_error\n"}; -sub finalize_read { print STDERR "finalize_read\n"}; -sub finalize_uploads { print STDERR "finalize_uploads\n"}; +sub finalize_body { } +sub finalize_cookies { } +sub finalize_error { } +sub finalize_read { } +sub finalize_uploads { } -sub prepare_request { print STDERR "prepare_request\n"}; -sub prepare_query_parameters { print STDERR "prepare_query_parameters\n"}; -sub prepare_read { print STDERR "prepare_read\n"}; -sub prepare_uploads { print STDERR "prepare_uploads\n"}; +sub prepare_request { } +sub prepare_query_parameters { $_[0]->SUPER::prepare_query_parameters( $_[1], '') } +sub prepare_read { } +sub prepare_uploads { } sub prepare_path { print STDERR "prepare_path\n"; my ($self,$c)=@_; @@ -23,10 +23,10 @@ sub prepare_path { $c->request->base(URI->new('/')); } -sub read { print STDERR "read\n"; '' }; -sub read_chunk { print STDERR "read_chunk\n"; '' }; +sub read { '' }; +sub read_chunk { '' } -sub write { print STDERR "write\n"}; +sub write { } 1; diff --git a/GroLUG/lib/GroLUG/C/Iscritto.pm b/GroLUG/lib/GroLUG/C/Iscritto.pm index 78b89ca..7eefb79 100644 --- a/GroLUG/lib/GroLUG/C/Iscritto.pm +++ b/GroLUG/lib/GroLUG/C/Iscritto.pm @@ -252,6 +252,8 @@ sub cancella_pag :Local { sub send_email :Private { my ($self,$c)=@_; + $c->log->debug('mando posta'); + my $iscritti=GroLUG::M::DB->resultset('Iscritto'); my @scadenze=map { +{ |