|
Lines 106-112
sub get_expiry_date {
Link Here
|
| 106 |
my ($self, $date ) = @_; |
106 |
my ($self, $date ) = @_; |
| 107 |
if ( $self->enrolmentperiod ) { |
107 |
if ( $self->enrolmentperiod ) { |
| 108 |
$date ||= dt_from_string; |
108 |
$date ||= dt_from_string; |
| 109 |
$date = dt_from_string( $date ) unless ref $date; |
109 |
$date = ref $date ? $date->clone() : dt_from_string( $date ); |
| 110 |
return $date->add( months => $self->enrolmentperiod, end_of_month => 'limit' ); |
110 |
return $date->add( months => $self->enrolmentperiod, end_of_month => 'limit' ); |
| 111 |
} else { |
111 |
} else { |
| 112 |
return $self->enrolmentperioddate; |
112 |
return $self->enrolmentperioddate; |
| 113 |
- |
|
|