Changeset 2155 for trunk/LATMOS-Accounts
- Timestamp:
- 11/26/18 16:39:58 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm
r2147 r2155 1689 1689 if (my $expire = $self->_computeEndEmployment($self->base->config('employment_delay') || 0)) { 1690 1690 $changes{ 'expire' } = $expire; 1691 } elsif (my $expiren = $self->_computeEndEmployment($self->base->config('employment_delay') || 0, 1)) { 1692 $changes{ 'expire' } = $expiren; 1693 } 1691 } elsif (my $prevEmployement = $self->_get_attributes('prevEmployement')) { 1692 my $oprev = $self->base->get_object('employment', $prevEmployement); 1693 $changes{ 'expire' } = $oprev->_get_attributes('lastday'); 1694 } elsif (($self->base->config('unemployed_expire') ||'') ne 'no') { 1695 if (my $def = $self->base->{defattr}{'user.expire'}) { 1696 $changes{ 'expire' } = $def; 1697 } 1698 } 1699 1694 1700 1695 1701 if (%changes) {
Note: See TracChangeset
for help on using the changeset viewer.