adding deconstructors
This commit is contained in:
parent
20d259dd0d
commit
970eeb048a
3 changed files with 46 additions and 5 deletions
|
|
@ -173,6 +173,20 @@ sub deleteFromGroups {
|
|||
$group->deleteUsers([$self->userId],$groups);
|
||||
}
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
=head DESTROY ( )
|
||||
|
||||
Deconstructor.
|
||||
|
||||
=cut
|
||||
|
||||
sub DESTROY {
|
||||
my $self = shift;
|
||||
undef $self;
|
||||
}
|
||||
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
=head2 getGroups ( [ withoutExpired ] )
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue