Group does not use Tie::CPHash (via the dead %group variable) nor WebGUI::Auth

This commit is contained in:
Colin Kuskie 2007-10-30 20:33:48 +00:00
parent 2165538936
commit 0f3505a46f

View file

@ -16,7 +16,6 @@ package WebGUI::Group;
use strict;
use Tie::CPHash;
use WebGUI::Auth;
use WebGUI::LDAPLink;
use WebGUI::Macro;
use WebGUI::Utility;
@ -984,11 +983,9 @@ If you specified "new" for groupId, you can use this property to specify an id y
=cut
sub new {
my ($class, %group);
tie %group, 'Tie::CPHash';
my $self = {};
$class = shift;
my $class = shift;
$self->{_session} = shift;
$self->{_groupId} = shift;
my $override = shift;