do not make a user object unless it is needed

This commit is contained in:
Colin Kuskie 2008-11-13 17:43:56 +00:00
parent 9289bdb34c
commit 3f393980c4

View file

@ -239,10 +239,10 @@ Unique hash identifier for a user. If not supplied, current user.
sub canEdit {
my $self = shift;
my $userId = shift || $self->session->user->userId;
my $user = WebGUI::User->new($self->session, $userId);
if ($userId eq $self->get("ownerUserId")) {
return 1;
}
my $user = WebGUI::User->new($self->session, $userId);
return $user->isInGroup($self->get("groupIdEdit"));
}