diff options
Diffstat (limited to 'GroLUG/lib/GroLUG/M/DB/Iscritto.pm')
-rw-r--r-- | GroLUG/lib/GroLUG/M/DB/Iscritto.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/GroLUG/lib/GroLUG/M/DB/Iscritto.pm b/GroLUG/lib/GroLUG/M/DB/Iscritto.pm index 686b4b2..ca475ee 100644 --- a/GroLUG/lib/GroLUG/M/DB/Iscritto.pm +++ b/GroLUG/lib/GroLUG/M/DB/Iscritto.pm @@ -7,4 +7,10 @@ __PACKAGE__->add_columns(qw(id nome email attivo note)); __PACKAGE__->set_primary_key('id'); __PACKAGE__->has_many(pagamenti=>'GroLUG::M::DB::Pagamento','iscritto',{order_by => 'data_scadenza desc'}); +sub scadenza { + my ($self)=@_; + + return $self->pagamenti()->next()->data_scadenza(); +} + 1; |