some bug fixes and the new group of groups hierarchy viewer in the group manager

This commit is contained in:
JT Smith 2005-03-03 03:33:09 +00:00
parent 8bd4f8274a
commit c29c81be23
5 changed files with 54 additions and 34 deletions

View file

@ -157,7 +157,7 @@ sub definition {
#-------------------------------------------------------------------
sub DESTROY {
my $self = shift;
$self->{_thread}->DESTROY if (exists $self->{_thread});
$self->{_thread}->DESTROY if (exists $self->{_thread} && ref $self->{_thread} =~ /Thread/);
$self->SUPER::DESTROY;
}